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IDENTIFICATION 


PRODUCT CODE: AC-F138A-MC 

PRODUCT NAME: CJKDAAO F-11 MMU DIAG 

DATE: 12-JAN-1979 

MAINTAINER: SMALL SYSTEMS DIAGNOSTIC ENGINEERING 
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THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES 
one FOR ANY ERRORS THAT MAY APPEAR IN THIS 


THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED TO THE 
PURCHASER UNDER A LICENSE FOR USE ON A SINGLE COMPUTER SYSTEM 
AND CAN BE COPIED (WITH INCLUSION OF DIGITAL'S COPYRIGHT NOTICE) 
ONLY FOR USE IN SUCH SYSTEM, EXCEPT AS MAY OTHERWISE BE PROVIDED 
IN WRITING BY DIGITAL. 


DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY 
FOR THE USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT 
THAT IS NOT SUPPLIED BY DIGITAL. 


COPYRIGHT (C) 1979 BY DIGITAL EQUIPMENT CORPORATION 
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PROGRAM INFORMATION 


ABSTRACT 


THIS PROGRAM WAS DESIGNED USING A "BOTTOM UP’ APPROACH 
STARTING WITH THE SMALLEST SEGMENT OF MEMORY MANAGMENT 
LOGIC POSSIBLE AND BUILDING TO COVER ALL OF THE LOGIC. 
THE DIAGNOSTIC WILL PROVIDE ENOUGH INFORMATION SUCH THAT 
BY DEDUCTION, THE FAILURE CAN BE ISOLATED TO A SMALL 
SEGMENT OF THE MEMORY MANAGEMENT LOGIC. 


THE PROGRAM BEGINS BY TESTING SOME OF THE INTERNAL CPU 
DATA AND ADDRESS PATHS AND ADDRESS DETECTION LOGIC, THEN 
WORKS OUTWARD THROUGH THE MEMORY MANAGEMENT REGISTERS. 
AFTER THE REGISTERS ARE FOUND TO BE USE ON 
(CONSTRUCTION OF PHYSICAL $s OM A 

AND THE ASSOCIATED PAR/POR INFORMATION) IS TESTED FOLLOWED 
BY TESTING OF THE ABORT AND STATUS SEGMENTS OF LOGIC. 
FINALLY, CHECKS OF SPECIAL ABORT SEQUENCES AND TESTING OF 
THE MFPI/ATPI INSTRUCTIONS ARE DONE. 


REQUIREMENTS 


A KDF11-A PROCESSOR WITH A MINIMUM OF 16K OF MEMORY 

AND ~& CONSOLE TERMINAL ARE REQUIRED TO RUN THE PROGRAM 
UNLESS THE PROGRAM 1S RUNNING UNDER APT OR ACT IN WHICH 
CASE THE CONSOLE TERMINAL IS NOT NECESSARY. 


ACT11/XXOP PROGRAMMING SPECIFICATION 

STANDARD APT SYSTEM TO A PDP11 DIAGNOSTIC INTERFACE 
DIAGNOSITC ENGINEERING STANDARDS AND CONVENTIONS 
PDP11 MAINDEC SYSMAC PACKAGE 

XXDP USER'S MANUAL 


PRELIMINARY PROGRAMS 


VRVSKRANLSSeNSaRanw=-os 


BEFORE THIS MEMORY MANAGEMENT DIAGNOSITC IS RUN, THE 
FOLLOWING CPU DIAGNOSTIC SHOULD BE RUN: 


MD-11-CJKDB FONZ-11 CPU TESTS 
ALSO, ONE OF THE MAIN MEMORY DIAGNOSTICS SHOULD BE RUN 
TO SCAN AT LEAST THE FIRST 16K TO SEE THAT A PROGRAM 
CAN BE EXECUTED. 


OPERATING INSTRUCTIONS 
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2.1 LOADING PROCEDURES 


ThE PROGRAM CAN ALSO BE DIRECTLY LOADED 
USING THE ABSOLUTE LOADER AND THE BINARY PAPER TAPE. 


STARTING PROCEDURES 


THE PROGRAM IS STARTED BY = t ADDRESS 200. SINCE THERE 
1S NO HARDWARE SWITCH REGISTER, THE PROGRAM WILL USE THE 
SOFTWARE SWITCH REGISTER AT LOCATION 176 (LOCATION 174 

WILL BE USED AS THE SOFTWARE DISPLAY REGISTER). IN THAT CASE 
THE PROGRAM WILL ASK FOR THE INITIAL SWITCH REGISTER 

VALUE BY TYPING ““SWR= XXXXXX  NEW= AFTER TYPING 

THE NAME OF THE PROGRAM (XXXXXX = THE OCTAL CONTENTS OF 
LOCATION 176). (SEE SECTION 2.4) 


a i ss ss os ss Ss 
PADMA AN TU 
OOnNOUFSWN—O”O 


CONTROL SWITCH SETTINGS 


100000 HALT ON ERROR 

THIS SWITCH WHEN SET WILL HALT 
THE PROCESSOR WHEN AN ERROR IS 
DETECTED AFTER THE ERROR MESSAGE 
HAS BEEN TYPED. PRESSING CONTINUE 
WILL RESUME TESTING (SEE SECTION 
3.1 ABOUT LOADING THE SWITCH REG 
BEFORE CONTINUING). 


040000 LOOP ON a 
THIS —s WHEN SET WILL 
CAUSE THE PROGRAM TO LOOP ON 
THE CURRENT SUBTEST. 


020000 INHIBIT ERROR TYPEOUTS 
THIS SWITCH WHEN SET WILL 
INHIBIT THE TYPING OF ERROR 
MESSAGES. 


010000 INHIBIT TRACE TRAP 
THIS SWITCH WHEN SET WILL 
INHIBIT T-B1T TRAPPING WHICH 
NORMALLY TAKES PLACE DURING 
EVERY OTHER PASS STARTING 
WITH THE THIRD PASS. 


004000 INHIBIT SUBTEST ITERATIONS 
THIS SWITCH WHEN SET INHIBITS 
ITERATIONS OF EACH SUBTEST AFTER 


174 
175 
176 
177 
178 
179 
180 
181 
182 
183 
184 
185 
186 
187 
188 
189 
190 
191 
192 
193 
194 
195 
be 


97 
198 


4 Se 
283 
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THE FIRST PASS. IF THIS SWITCH 
1S NOT SET, EACH SUBTEST IS RUN 
200. TIMES. 


002000 BELL ON ERROR 
THIS SWITCH WHEN SET WILL RING 
hy CONSOLE TERMINAL BELL WHEN 
AN ERROR HAS BEEN DETECTED. 


001000 ERROR 
THIS SWITCH WHEN SET WILL 
CAUSE THE PROGRAM TO LOOP ON THE 
FIRST FAILURE WHICH IS ENCOUNTERED 
EVEN IF THE FAILURE IS INTERMITTANT 


000400 TEST IN SWR<7:0> 
THIS SWITCH WHEN SET WILL 
CAUSE THE PROGRAM TO LOOP ON THE 
TEST WHOSE TEST NUMBER IS SET 
IN BITS 7-0 OF THE SWITCH REG. 


MMPMrofnfnrnrshwr 
PA et et et et et et et os 
SCOONOUFWN— 


LOADING THE SWITCH REGISTER 


TO LOAD THE SOFTWARE SWITCH REG. WHILE THE PROGRAM IS 
RUNNING, A CONTROL G (*G) SHOULD BE TYPED ON THE CONSOLE 
TERMINAL. (THE ‘SCOPE’ AND “ERROR’’ ROUTINES CHECK TO SEE 

1f A “G HAS BEEN TYPED.) THE ORIGINAL VALUE OF THE SOFTWARE 
SWTICH REG. WILL BE REQUESTED AS MENTIONED IN SECTION 2.2. 


IN RESPONSE TO A “G OR AT THE BEGINNING OF THE PROGRAM, THE 
PROGRAM WILL TYPE: 


SWR = XXXXXX NEW = 


WHERE ‘"XXXXXX"’ IS THE CURRENT OCTAL CONTENTS OF LOC. 176. 
THE OPERATOR MAY THEN TYPE ANY ONE OF THE FOLLOWING: 
XXXXXX<CR> ONE TO SIX OCTAL DIGITS FOLLOWED BY A 
CARRIAGE RETURN WHICH WILL BE LOADED 
AS THE NEW VALUE FOR THE SWITCH REG. 
<CR> AS IT AS. <CR>, LEAVES THE SWITCH REG. 


XXX*U . CONTROL“U (*U) WILL CAUSE a OF THE 
DIGITS TYPED SO FAR TO BE IGN 
| WILL CAUSE THE PROGRAM TO TYPE. THE PRESENT 
AND PASS RS, REQUEST A NEW VALUE 


REG., AND JUMP TO THE END- 
OF=PASS ROUTINE SO THE PROGRAM WILL GO DIRECTLY 
TO THE NEXT PASS WITH A NEW SW. REG. VALUE 
<ILL.CHAR> ANY CHARACTER TYPED WHICH IS NOT ANY OF THE 
ABOVE a AN OCTAL DIGIT WILL CAUSE THE PROGRAM 
\ TYPE A ‘'2<CRLF>"' AND REACT AS THOUGH A 
U HAD BEEN TYPED. 


NOTE: RECOGNITION OF A *G MAY BE HAMPERED BY 
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2.5 


3.0 


3.1 


3.2 
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enna EXECUTION OF A COUPLE ‘RESET’ INSTRUCTIONS 
WITHIN THE PROGRAM. 


EXECUTION TIRES 


THE RUN TIME FOR A SINGLE PASS WITH NO ITERATIONS 
OR TRACE TRAPPING 1S APPROXIMATELY 5 SECONDS. 


THE RUN TIME FOR A SINGLE PASS WITH ITERATIONS 
AND TRACE TRAPPING ENABLED IS APPROXIMATELY 30 SECONDS. 


ERROR INFORMATION 


ERROR REPORTING PROCEDURES 


If AN ERROR IS ator THE PROGRAM WILL TRAP TO THE 
ERROR HANDLING ROUTINE (SERROR). THE VALUE OF BITS 
15,13,10, AND 9 IN THE SWITCH REGISTER ARE CONSIDERED 
IN REPORTING AN ERROR (SEE SECTION TH 

ERROR INFORMATION WILL BE TYPED UNLESS SwW13 = 


If SWi5 = 1, THE PROCESSOR WILL HALT AFTER THE ERROR JS 
REPORTED. IF THE CONTENTS OF THE SOFTWARE SWITCH REGISTER 
ARE TO BE CHANGED, A “G SHOULD BE TYPED BEFORE PRESSING 
“*CONTINUE’’ TO RESUME TESTING. 


IF SW9 = 1 (LOOP ON ERROR), THE PROGRAM WILL GO TO THE 
ADDRESS CONTAINED IN LOCATION “SLPERR'. AFTER REPORTING 
THE ERROR. ‘‘SLPERR’’ IS SET BY EACH ‘'SCOPE'’ CALL AND IS 
SET DIRECTLY DURING SOME SUBTESTS TO PROVIDE THE SMALLEST 
LOOP FOR LOOPING ON ERROR. IF SW9 = 0, THE PROGRAM WILL 
RETURN TO THE INSTRUCTION FOLLOWING THE —,. CALL. 

(SEE SECTION 5.3 FOR MORE ON ‘LOOP ON ERROR’) 


INTERPRETING ERROR REPORTS 


yw ERROR REPORT TYPES THE NUMBER OF THE TEST IN WHICH 
THE ERROR TOOK PLACE (TESTNO) AND THE LOCATION OF THE 


RA AN THEN READ THE 
Syrgrtt ASSOCIATED WITH THAT PARTICULAR ERROR AND SUBTEST. 
A DESCRIPTION OF THE TEST FOUND IN THE PROGRAM LISTING 
WILL ALSO PROVIDE THE OPERATOR WITH INFORMATION ON THE LOGIC 
AND FUNCTIONS BEING TESTED. 


EVERY ERROR REPORT ALSO TYPES AN ERROR MESSAGE 
GIVING A VERBAL DESCRIPTION OF THE ERROR THAT HAS 
BEEN DETECTED. 


BY USING THE COMMENTS AND TEST DESCRIPTION FOUND IN 
THE PROGRAM LISTING TO DETERMINE WHAT FUNCTION OR 


SEQ 0007 


1 1 
MD-11-CJKDA-A F-11 MAU ie tae MACY11 30A(1052) 29-JAN-79 15:10 PAGE 8 
CJKDAA.P11 29-JAN-79 14:38 


LOGIC WAS BEING TESTED, THE OPERATOR CAN THEN REFER 
TO THE ENGINEERING DRAWINGS TO ISOLATE THE PROBABLE 
CAUSE FOR THE FAILURE. 


SAMPLE ERROR REPORT 


BELOW 1S AN EXAMPLE OF AN ERROR WHICH = HAVE 
OCCURRED DURING EXECUTION OF THE PROGRAM 


MEM. MGAT. REG. BITS NOT SET yyy Leg 

REGISTR WROTE READ READ-( 

ADDRESS (OCTAL) (OCTAL) 54$2109876543210 TESTNO ERRORPC 
177572 040000 060000 0110000000000000 000012 022060 


WE SEE THAT THE ERROR OCCURRED IN TEST 12 AT LOACTION 
022060. THE “‘REGISTR ADDRESS'’ TELLS US THAT WE WERE 
TESTING MEMORY MANAGEMENT'S STATUS RGISTER 0 (SRO). 


B SRO BUT WHEN WE 
READ IT BACK WE READ ‘060000"'. IT APPEARS THAT BIT 13 IS 
STUCK AT ‘"I"* OR IT 1S GETTING SET WHEN BIT 14 IS SET 

TO *1"*, ERROR REPORTS BEFORE AND AFTER THIS ONE COULD 
TELL US WHICH I. -HE CASE. 


MISCELLANEOUS INFORMATION 


THE PROGRAM IS FULLY ACT AND APT COMPATABLE 
AND 1S SUPPORTED UNDER THE XXDP PACKAGE. 


END-OF -PASS MESSAGE 
AT THE END OF EACH PASS OF THE PROGRAM THE PASS NUMBER 
AND TOTAL NUMBER OF ERRORS SINCE THE LAST END-OF-PASS ARE 
REPORTED IN THE END-OF-PASS MESSAGE. FOR EXAMPLE: 

END OF PASS #2 TOTAL ERRORS SINCE LAST REPORT 0 
THAT WOULD INDICATE THAT PASS TWO WAS JUST COMPLETED 
AND NO ERRORS WERE DETECTED DURING THAT PASS. BOTH 
THE PASS NUMBER AND NUMBER OF ERRORS ARE DECIMAL NUMBERS. 


T-BIT TRAPPING 


THE ‘"T=BIT'’ (BIT 4) IN THE PROCESSOR STATUS WORD IS SET 

BY AN “'RTI"’ IN THE END-OF-PASS ROUTINE FOR BS OTHER PASS 
BEGINNING WITH THE THIRD PASS (PASSES 4 y T-BIT 
TRAPPING CAN BE INHIBITED BY SETTING BIT ‘3°? i IN THE SWITCH 
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REGISTER (SEE SECTION 2.4). 

POWER FAILURE HANDLING 

IF A POWER FAIL OCCURS (FOLLOWED BY A POWER UP), THE 
MESSAGE ‘‘POWER FAILURE-RESTARTING’’ IS TYPED OUT AND 
THE PROGRAM WILL RESTART EXECUTION AT “'RESTRT:"° 
PHYSICAL BUS ADDRESS CONSTRUCTION 


BELOW IS A SIMPLIFIED DIAGRAM OF HOW THE MEMORY 
MAMAGEMENT LOGIC CONSTRUCTS A PHYSICAL BUS ADDRESS 
USING THE VIRTUAL ADDRESS AND THE PAGE ADDRESS REGISTER. 
THE PAGE DESCRIPTOR REGISTER SELECTED WILL CONTAIN THE 
PAGE EXPANSION, LENGTH, AND ACCESS INFORMATION. 


12 11 10 09 08 07 06 05 04 03 02 01 00 


(ADDED TO) 
14 13 12 11 10 09 08 07 06 05 04 03 02 01 00 


I 
l 
1 
I 
I 
I 
1 
l 
I 
YW 


20 19 18 17 16 15 14 13 12 11 10 09 08 07 06 05 04 03 02 01 00 


VBA BITS <15:13> SELECT THE APPROPRIATE PAR AND PDR 
**= PSW MODE “* 01 (BIT 15) SELECTS THE USER ( (=1) OR 
KERNEL (=0) SET OF PAR'S/PDR'S 


RELOCATION THROUGHOUT MEMORY 


A FEATURE WAS ADDED TO ALLOW THE CONSTRUCTION OF PHYSICAL 
BUS ADDRESSES ABOVE THE NORMAL 16K LIMIT. THE SETTING 
OF THE LOCATION SMADR1 IN THE E-TABLE WITH ONE OF THE 
FOLLOWING CONSTANTS WILL ACCESS LOCATIONS NBETUEEN 0 AND 7600 
OF EACH 4K GROUP UP TO THE MAXIMUM MEMORY ON THE SYSTEM. 
THE FIRST LOCATION OF EACH BLOCK(32 WORDS) 1S WRITTEN AND READ. 
SEE TEST #24 IN THE LISTING FOR MORE DETAILS. 


CONSTANT MAX. MEM. CONSTANT MAX. MEM, CONSTANT MAX. MEM. 


0 OR 600 16K 3200 56K 5600 96K 
1000 20K 3400 60K 6000 100K 
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FOLLOWING IS A LIST OF THE SUBROUTINES AND HANDLERS USED 
BY THIS PROGRAM THAT ARE NOT PROVIDED BY THE ‘’SYSMAC 
PACKAGE’’. DETAILS OF THE SUBROUTINES UNIQUE TO THIS 
PROGRAM MAY BE FOUND IN THE PROGRAM LISTING. REFER TO 
ce ee DOCUMENT AND PROGRAM LISTING FOR THE OTHER 


1. en OFF T-BIT AND SAVE CURRENT PSW 
2. TURN ON T-BIT AND RESTORE PREVIOUS PSWd 
3. SET ALL WRITEABLE BITS IN ALL PAR/PDR'S 
. READ AND COMPARE KERNEL AND USER PAR/PDR'S 
5. CONVERT VIRTUAL ADDRESS TO PHYSICAL ADDRESS 


PROGRAA LISTING 


A TABLE OF CONTENTS APPEARS AT THE BEGINNING OF THE Ps 
WHICH CONTAINS THE NAMES OF EACH SECTION, SUBTEST, AND 
++ aa AND THE LINE NUMBERS CORRESPONDING TO THE START OF 


FOLLOWING THIS SECTION OF DOCUMENTATION IS THE ACTUAL 
PROGRAM LISTING COMPLETE WITH SUBTEST DESCRIPTIONS AND 
“CODING COMMENTS’’. 


USING THE PROGRAM TO DIAGNOSE A FAULT 


—e, AN ERROR OCCURS, ONE OF THE THINGS THAT'S IMPORTANT 
TO NOTE IS WHAT PASS THE ERROR OCCURRED ON. IF THE PASS 
BER 1$ ODD AND IS TH R GREATER, THE ERROR MIGHT BE 

E PROGRAM Se WITH BIT 


“BIT 


ASS NUMBE 

ERROR MAY BE ITERATION SENSITIVE. ING THE Pp 

AGAIN WITH BIT 11 OF THE SWITCH REG. EQUAL TO ‘l'' TO INHIBIT 
ITERATIONS. THESE HINTS SHOULD HELP YOU DETERMINE WHAT MAKES 
THE MACHINE FAIL AND WHEN, 


IF YOU HAVE BEEN RUNNING WITH BIT 15 OF THE SWITCH 
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REG. EQUAL TO ‘0’, THEN YOU ARE ABLE TO LOOK AT ALL 
THE ERRORS THAT MAY BE RELATED TO THE FAULT YOU ARE 
G A FAULT IN AN EARLIER ge . IN 


YOu E 
F THE FAULT. NOW USE THE METHOD 
Tl .2 FOR EACH ERROR TO GATHER AS 
MUCH INFORMATION AS POSSIBLE. 


NOW TO TEST YOUR IDEAS ON THE oth OF THE FAILURE, 
Y ANT CONDITION. SET BIT 09 
ON THE ROR 


F AN BE 
REPLACED WITH A BRANCH (REFER TO COMMENTS BY ERROR CALLS 
IN THE PROGRAM LISTING). 


OR YOU COULD LOOP ON THE TEST BY EITHER SETTING BIT 14 

OF THE SWITCH REG. EQUAL TO ‘l"' OF BY SETTING BIT 08 OF THE 

SWITCH REG. EQUAL TO ‘"l*' AND THEN = ito THE TEST NUMBER 

IN BITS 07-00 OF THE SWITCH REG. YOU WILL PROBABLY WANT TO 

poping A enon TYPEOUTS BY SETTING BIT 3 OF THE SWITCH REG. 
L ¥ 


SEQ 0011 
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-TITLE MD-11-CJKDA-A F-11 MAU DIAG 
s*COPYRIGHT (C) JAN-79 

:*DIGITAL EQUIPMENT CORP. 
s*MAYNARD, MASS. 01754 


ie 
:*THIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 
s*PACKAGE (MAINDEC-11-DZQAC-C35), JAN 19, 1977. 


;* 
- SBTTL OPERATIONAL SWITCH SETTINGS 
SWITCH 


AD et ed et et et et 


HALT ON ERROR © 

LOOP ON TEST 

INHIBIT ERROR TYPEOUTS 
INHIBIT TRACE TRAP 
INHIBIT ITERATIONS 

BELL ON ERROR 

LOOP ON ERROR 

LOOP ON TEST IN SWR<7:0> 
‘SeTTL BASIC DEFINITIONS 


s*INITIAL ADDRESS OF THE STACK POINTER *#* 1100 *#* 
001100 STACK= 1100 
-EQUIV EMT,ERROR ;:BASIC DEFINITION OF ERROR CALL 
-EQUIV 10T,SCOPE ;3;BASIC DEFINITION OF SCOPE CALL 


; *MISCELLANEOUS DEFINITIONS 
000011 T= 11 ;:CODE FOR HORIZONTAL TAB 
3;CODE FOR LINE FEED 
::;CODE FOR CARRIAGE RETU 
00 ::;CODE FOR CARRIAGE RETURN-LINE FEED 
177776 S ;;PROCESSOR STATUS WORD 


177774 4 Ue et REGISTER 
7772_~—C«, AR_IN eg B REQUEST REGISTER 
‘ : WARDUARE SWITCH REGISTER 
177570 ; ;HARDWARE DISPLAY REGISTER 


;*GENERAL PURPOSE REGISTER DEFINITIONS 


Nm 
o 


SUFSRFUNSSSSN 


03 


5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 


000000 
000001 


 VYDwDWwWwWADDzDWD-:: 
“eo Pe aah ree ft 
Huth th tt oO ow 


: PROGRAM COUNTER 


;*PRIORITY LEVEL DEFINITIONS 
000000 PRO= 0 ;PR 
000040 PRi= 40 


000007 
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000100 
000140 
000200 


;: PRIORITY 
7: PRIORITY 


000001 


$w01, Sw 
$w00, SwO 
BIT DEFINITIONS (B1T00 TO B1115) 
100000 100000 


000001 


SEQ 0015 
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105,81 


15 
14 
13 
T2 
11 
10 


E OUT AND OTHER ERRORS 
amen | AND ILLEGAL INSTRUCTIONS 


i TRACE T 
:SOREAEPOLNT TRAP (BPT) 
NPUT/OUTPUT TRAP (1OT) *#SCOPE®® 
;POWER FAIL 
: EMULATOR TRAP (EMT) *#ERROR*® 
Z:TTY KEYBOARD VECTOR 
* 000064 S31TY PRINTER VECT 
000240 PIRQVEC=240 {PROGRAM INTERRUPT REQUEST VECTOR 
.SBTTL MEMORY MANAGEMENT DEFINITIONS 
;*KT11 VECTOR ADDRESS 
000250 MMVEC= 250 
;#KT11 STATUS REGISTER ADDRESSES 


177572 


172516 
s*USER "'l"’ PAGE DESCRIPTOR REGISTERS 
UIPDRO= 177600 


UIPDR7= 177616 
s*USER "'l'’ PAGE ADDRESS REGISTERS 
UIPARO= 177640 


UIPAR7= 177656 
S*KERNEL '‘l'* PAGE DESCRIPTOR REGISTERS 
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3s 


et es es os 
SNS NSS 
Ww 
—t et oe et 
orRNosr 


tet es et es ss 
SNS NSN 
Mrrrnrrnrn 


KIPAR7= 
SP .KSP 


SP ,USP 
B174, 1811 
EQUIV B1T6,WBIT 
001100 KERSTK= STACK 
000700 USESTK= STACK-200 


:*ADDITIONAL DEFINITIONS 


-SBTTL TRAP CATCHER 


000000 -=0 
;*ALL UNUSED LOCATIONS FROM 4 - 776 yo # A **,42,HALT" 

;*SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 

i *LOCATION CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 


000174 
000000 DISPREG: .WORD 0 :;SOFTWARE DISPLAY REGISTER 
00000 SWREG: .WORD 0 :: SOFTWARE SWITCH REGISTER 
-SBTTL ae ADDRESS(ES) 
000137 020000 @#START ;; JUMP TO STARTING ADDRESS OF PROGRAM 
, - SBTTL ATI HOOKS 


SURAT HAAAAKAAAAAAAAAAAA TATA A AKA T AK AARAAA ARK eKKKR eK KKe KAKA AE 


HOOKS REQUIRED BY ACT11 
$s ;SAVE PC 
33 1)SET LOC.46 TO ADDRESS OF SENDAD IN .SEOP 
#32)SET Loc. ga TO ZERO 


000204 .=$SVPC 3; RESTORE P 
-SBTTL APT PARAMETER BLOCK 


ppeeeenrerrereerereeeererrereeeeeteeteeeKeNeee eee eRe 
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;SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 
sp eeeeerererecereerrerrerereereererereeeeeeeeeeeeeeeeeereeereeete 
23 SAVE CURRENT LOCATION 
;SET POWER FAIL TO POINT TO START OF PROGRAM 
33FOR APT START UP 
;;POINT TO APT INDIRECT ADDRESS PNTR. 
:;POINT TO APT HEADER BLOCK 
 TRESET LOCATION COUNTER 
peeereeererereerererrerererererererereeeeeeenereeeeereeeeeeeees 
SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
s INTERFACE SPEC. 


0 ;;TWO HIGH BITS OF 18 BIT one ADDR. 
SMAIL 5;A (BITS 0-15) 
10 NGEST TEST 


ee UN 
: 20 $8 ST PASS ON 1 UNIT (QUICK VERIFY) 
SUNITA: 5 ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 
SETEND-SMAIL/2 ;;LENGTH MAILBOX-E TABLE (WORDS) 
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733 -SBTTL COMMON TAGS 
755 ,eteerererreerereerererereeeererereereReIteeeeAreKeKeeAeKAKeeeees 
756 SS THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
i} 7*USED IN THE PROGRAM. 
759 001100 -=1100 
760 001100 SCMTAG: z3START OF COMMON TAGS 
761 001100 000000 WORD 0 
762 001102 000 STSTNM: .BYTE 0 : CONTAINS THE TEST NUMBER 
763 001103 000 SERFLG: .BY 0 : 3 CONTAINS ERROR FLA 
764 001104 000000 SICNT: . 0 ONTAINS SUBTEST ITERATION COUNT 
765 001106 000000 SLPADR: .WORD 0 4: TAINS SCOPE LOOP ADDRESS 
766 001110 000000 SLPERR: .WORD 0 7: CONTAI RE 
767 001112 000000 SERTTL: .WORD 0 3;CONTAINS TOTAL ERRORS DETECTED 
768 001114 000 SITEMB: .BYTE 0 : CONTAINS ITEM CONTR 
769 001115 001 SERMAX: .BYTE 1 sCONTAINS MAX. ERRORS PER TEST 
770 001116 000000 SERRPC: .WORD 0 ::CONTAINS PC OF LAST ERROR INSTRUCTION 
771 001120 000000 SGDADR: .WORD 0 3;CONTAINS ADDRESS OF ‘GOOD’ DAT 
772 001122 000000 SBDADR: .WORD 0 s CONTAINS ADDRESS OF "BAD‘ DATA. 
773 001124 000000 S$GDDAT: .WORD 0 ; CONTAINS *G600D' DATA 
774 001126 000000 WORD 0 ; TAINS ‘BAD’ DATA 
775 001130 000000 WORD 0 : :RESERVED--NOT TO BE USED 
776 001132 000000 WORD 0 
777 001134 000 SAUTOB: .BYTE 0 : AUTOMATIC MODE INDICATOR 
778 001135 000 SINTAG: .BYTE 0 : INTERRUPT MODE INDICATOR 
779 001136 000000 WORD 0 
780 001140 177570 WR: WORD DSWR s ADDRESS OF SWITCH REGISTER 
781 001142 177570 DISPLAY: .WORD DDISP ADDRESS OF DISPLAY REGISTER 
782 001144 177560 TKS: 177560 33 TTY KBD STATUS 
783 001146 177562 $TKB: 177562 3:TTY KBD BUFFER 
784 001150 177564 S$TPS: 177564 ::TTY PRINTER STATUS REG. ADDRESS 
785 001152 177566 $TPB: 177566 ssTTY PRINTER BUFFER REG. ADDRESS 
786 001154 000 $NULL: .BYTE 0 7 :CONTAINS NULL CHARACTER FOR FILLS 
787 001155 002 SFILLS Y 2 CONTAINS # OF FILLER CHARACTERS REQUIRED 
788 001156 012 S$FILLC: .BYTE 12 :: INSERT fut CHARS. AFTER A “LINE F 
789 001157 STPFLG: .BYTE 0 33""TERMINAL A VAILABLE'’ FLAG (B11<07>=0=YES) 
790 001160 000000 SREGAD: .WORD 0 sCONTAINS THE ADDRESS FROM 
791 t:WHICH ($REGO) WAS OBTAINED 
792 001162 SREGO: .WORD 0 ssCONTAINS (($REGAD)+0) 
793 001164 000000 $REG1: .WORD 0 3: CONTAINS (CSRECAD) 22) 
794 001166 SREG2: D O s;CONTAINS ((S$REGAD) +4) 
795 001170 000000 $REG3: .WORD 0 s CONTAINS ((SREGAD) +6) 
796 001172 000000 SREG4: .WORD 0 33 CONTAINS (($REGAD) +10) 
797 001174 000000 $REGS: .WORD 0 ONTAINS CCSREGAD) #0) 
798 001176 000000 STMPO: .WORD 0 tr R DEFINE 
799 001200 000000 S$TMP1: .WORD 0 730 DEFINED 
800 001202 000000 STMP2: .WORD 0 33 DEF INED 
801 001204 000000 S$TMP3: .WORD 0 s;USER DEFINED 
802 001206 000000 STMP4: .WORD 0 ;;USER DEFINED 
803 001210 000000 STMP5: .WORD 0 I DEFINED 
804 001212 000000 STIMES: 0 NUMBER OF ITERATIONS 
805 001214 000000 SESCAPE :0 : SCAPE ON ERROR ADDRESS 
806 001216 177607 000377 $BELL: .ASCIZ <207><377><577> CODE FOR BELL 
807 001222 077 $QUES: .ASCII s QUESTION MARK 
808 001223 015 S$CRLF: .ASCII aa s CARRIAGE RETURN 
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809 001224 000012 SLF: eASCIZ = <12> LiNE FEED 


j eeeeneererecererereereeerererereeeteereneeeeeereeeeereeeeeeeete 


*SBTTL APT MAILBOX-E TABLE 


5 PRAHA AA HAHAH AEKAA ETAT AHH EAE T HAAR AAEAAAAAAAAARAAAEKERAAERTAEe 


ee MAILBOX 
AASGTY Sat re TYPE CODE 
33 L ERROR NUMBER 


Rom ss Ss Ss SS 
SOOONOVEWN—O 


ed ed ot et ed 
SENSES 


& 2 09 Gd Od Co C9 Os CD CD CD OD 
S33Ss8S 


ACPUOP 


iy /euence “11/0502, 11/20= 03, 11/40=04,11/45=05 
/70=06 ,PDQ=07 ,a=10 

BIT 1O=REAL TIME ct COCK 

BIT Q=FLOATING POINT PROCESSOR 

B1T 8=MEMORY MANAGEMENT 
AMAMS1 ;;HIGH ADDORESS,M.S. BYTE 
AMTYP1 ;;MEM. TYPE BLK#1 

(HIGH BYTE) 


300 NSEC BIPOLAR=002 


el 500 NSEC A ons 
000000 te AMADR1 ;;HIGH ADDRESS,BL 
, MEM.LAST ADDR. oS BYTES, THIS WORD AND LOW OF ‘'TYPE’’ ABOVE 


;HOLDS TEST NUMBER FOR TYPEOUTS 

[USED TO STORE THE STACK POINTER AFTER A TRAP 
USED TO STORE THE PC OF A TRAP OR ABORT 
;USED TO STORE THE PS OF A TRAP OR ABORT 
USED TO STORE CONTENTS OF SRO 
sUSED TO STORE CONTENTS OR SR2 

sSAVES THE PSW THAT MAY HAVE ITS T-BIT ON 
;MOLDS RESULT OF ADDRESSES BEING AND-ED 
sHOLDS RESULT OF ADDRESSES BEING OR-ED 

OLOS NUMBER OF T 


3 HOL F “OUTS 
: HOLDS VIRTUAL ADDRESS TO BE CONVERTED 


;HOLDS BITS <15:00> OF PHYSICAL ADDRESS 
;HOLDS BITS <17:16> OF PHYSICAL ADDRESS 


esgssssssses 
SSSSUNNy 


Wall 
— oe 
ro 


000000 : 
000000 PBAHI : 
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-SBTTL ERROR POINTER TABLE 


:*THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN anaes 
s*THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND 

>*LOCATION SITEMB. THIS By INDICATES WHICH ITEM IN THE TABLE 1S PERTINENT. 

; *NOTE1: 1F SITEMB 1S 0 THE ONLY PERTINENT DATA IS (SERR 

:*NOTE2: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 


::POINTS TO THE ERROR MESSAGE 
:;POINTS TO THE DATA HEADER 
::POINTS TO THE DATA 

;:POINTS TO THE DATA FORMAT 


001316 


040714 EM1 ;UNEXPECTED CPU TRAP TO LOC. 004 
OLD PC OLD PSW R6 WAS TESTNO ERRORPC 
;TRAPPC, TRAPPS, WASR6, TESTNO, SERPPC, 0 


Ps eovwevrevVe 


;UNEXPECTED MEM. MGMT. TRAP TO LOC. 250 
OLD PC OLD PSW R6 WAS SRO SR2 TESTNO ERRORPC 
sat wes WASR6, WASSRO, WASSR2, TESTNO, SERRPC, 


:PRIORITY BITS SET WRONG IN PSW 
;WRO READ TESTNO ERRORPC 
;$REGO,$REG1, TESTNO, SERRPC ,0 


: evVeve 


;MODE BITS SET WRONG IN PSW 
WROTE READ TESTNO ERRORPC 
;$REGO,SREG1, TESTNO, SERRPC 0 


e eoveve 


a ADDRESSING BETWEEN HI@LO BYTES OF PSW 
E READ ESTNO ERRORPC 
‘REGO, $REG1,TESTNO,SERRPC ,0 


P evVveve 


Bees ese ee sess 


aos R6 CHANGED BY WRITING USER R6 
;WRO READ TESTNO ERRORPC 
:SREGO, $REG1, TESTNO, SERRPC ,0 


041235 EM7 ;A MEMORY MGMT. REG. TIMED OUT 
044205 ADDRESS TESTNO ERRORPC 
047260 ;SREGO, TESTNO, SERRPC 0 


Doh oh oh ok oh ok +] 
un 
Oownlwnr—o 
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001404 050042 DF7 :0,0,0 


st] TEM 10 
001406 041273 —M10 sSUMMARY OF MEM. MGAT. REG. TIMEOUTS 
001410 044235 DH10 :REGISTER-ADDRS - OF 
AND-ED OR-ED TIMOUTS TESTNO ERRORPC 
001412 047270 D110 {ANDADR ORADR , TONUM, TESTNO, SERRPC 0 
001414 050045 DF10 :0,0,1,0,0 


s*1TEM 11 
001416 041337 EM11 ;MEM. MGMT. REG. WOULD NOT — 
001420 044335 DH11 sREGISTR READ READ- (BINA 
sADDRESS (OCTAL) £4 32109876543210 TESTNO ERRORPC 
001422 047304 D111 ;$REGO,$REG1,SREG1, TESTNO, SERRPC 0 
001424 050052 DF11 :0,0,2.0,0 


:*1TEM 
001426 041377 ;MEM. MGMT. REG. BITS NOT SET CORRECTLY 
001430 044455 sREGISTR WROTE READ READ 
ADDRESS (OCTAL) (OCTAL) (BINARY) TESTNO ERRORPC 
001432 047320 ;$REGO,$REG1 , SREGZ2, SREGZ, TESTNO, SERRPC ,0 
001434 050057 :0,0,0,2,0,0 


st ITEM 
041446 7SRO EFFECTED BY WRITE TO PSW 
READ TESTNO ERRORPC 
:SREGO, TESTNO, SERRPC 0 


;SR1 DID NOT READ ALL ZEROS 

; READ TESTNO ERRORPC 

;$REGO, TESTNO, SERRPC 0 
050065 :0,0,0 


7 *] TEM 
001456 041536 ;DUAL ADDRESSING BETWEEN BYTES OF PAR OR PDR 
001460 044455 sREGISTER WROTE READ READ 
sADDRESS (OCTAL) (OCTAL) (BINARY) TESTNO ERRORPC 
001462 047320 7 $REGO, $REG1 .SREG2,$REG2, TESTNO, SERRPC.0 
001464 050057 :0,0,0,2,0,0 


001466 041612 ; DUAL woe BETWEEN PAR-POR'S 
001470 044645 ;PAR-PDR -PDR 

; CLEARED EFFECTD EXPECTD RECEIVD TESTNO ERRORPC 
001472 047346 ;$REGO,$REG1,S$REGS ,SREG2, TESTNO, SERRPC ,0 
001474 050070 :0,0,0.0,0,0 


001476 041654 ;PHYS. ADDR. FORMED READ WRONG 
001500 044745 ;PHYSICAL VIRTUAL 

; ADDRESS ADDRESS. KIPARS4 TESTNO ERRORPC 
001502 047364 ;PBALO, VIRT1,SREG4, TESTNO, SERRPC ,0 
001504 050076 :3,0,0,0,0 
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Sees83 


omlololopm jejeje lelej-ji-jl-j—) 
wn $0 0O~C UFWIN—oO 


oo 
Mrr 


ek ek tk ek et et ts st to ees ee eet 
Trwrt 
onouw 


ooo 
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041712 
045035 


047400 
05,0103 
041764 
045163 
047422 
050113 
042021 
045243 
047434 
050117 
042060 
050124 
042124 
050127 
042164 
050127 
042227 
050127 
042277 
050127 
042346 


050133 


MACY11 30A(1052) 


s*1 TEM 20 
EM20 
DH20 


D120 
DF 20 


st1TEM 21 
EM21 
DH21 


D121 
DF21 


s*1TEM 22 
EM22 
DH22 


DT22 
DF22 


s*1TEM 23 
EM23 


29-JAN-79 
ERROR POINTER TABLE 


1 2 
15:10 PAGE 21 
SEQ 0021 


;PHYS. ADDR. [ee READ WRONG IN RELOCATE MODE 
:PHYSICL PAR “hs 

ADDRESS VBA R5 PSw TESTNO 
;PBALO,VIRT1, vine, *SREGS SREGS, STMPO, TESTNO, SERRPC ,0 


e eVevaeVevVaeVveve 


;W-BIT DID NOT GET SET IN PDR 

> POR VIRTUAL 

TESTED ADDRESS TESTNO ERRORPC 
;SREG5 ,SREG3, TESTNO, SERRPC ,0 


. 
e eoveve 


:W-BIT SET IN MORE THAN ONE PDR 
:PDR IN POR pe Lat 

sERROR TESTED DRESS TESTNO ERRORPC 
7$R EGO, oy VSREGS, TESTNO,SERRPC ,0 


:W-BIT NOT CLEARED BY WRITING TO PDR 
:POR TESTNO ERRORPC 
;SREGS, TESTNO, SERRPC ,0 


WRITING SRO SET W-BIT IN KIPDR7 
sPDR WAS EXPECTD TESTNO ERRORPC 
;$REG2,S$REG1, TESTNO, SERRPC 0 


. 
e eoveve 


:W-BIT GOT SET DURING a ABORT 
¢POR WAS EXPECTD TESTNO ERRORPC 
; $REG2 ,SREG1, TESTNO, SERRPC 0 


. 
a evVveve 


; MEMORY MGMT. ACCESS ABORT DID NOT OCCUR 
PDR 4  PSW TESTNO ERRORPC 
;SREG2, STMPO,TESTNO,SERRPC ,0 


s ACCESS — DID NOT ABORT INSTRUCTION 
TNO ERRORPC 
$REG2, STHPO, TESTNO, SERRPC 0 


P oveve 


SRO At NOT REPORT ACCESS ERROR CORRECTLY 
:$RO WAS EXPECTD PDR 4  PSW TESTNO ERRORPC 
‘UASSRO SSREGS. SREG2,STMPO, TESTNO, SERRPC 0 


:0,0,0,0,0,0 — 
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1029 

st 1TEM 31 
Em31 ;SR2 DID NOT LOCKUP CORRECT VIRTUAL ADDR. 

She WAS EXPECTD PDR 4 PSW TESTNO ERRORPC 

iW WOE Oe amends -STMPO, TESTNO, SERRPC 0 


; PAGE ao ABORT OCCURRED WHEN IT SHOULDN'T HAVE 
3V.B.A. KIPDR4 SRO WAS SR2 WAS TESTNO ERRORPC 
;SREGO,$REG4, UASSRO, WASSR2, TESTNO, SERRPC 0 


Py eVeveVeve 


oO 
w 
~ 


o_ Pa ABORT DID NOT OCCUR WHEN IT SHOULD HAVE 
A. KIPDR4 TESTNO ERRORPC 
:SREGO, SREG4, TESTNO, SERRPC 0 
050127 :0,0,0.0 


SEPEREL SELES EaecS 


042631 EM34 + SRO af NOT REPORT PAGE LGTH. ABORT CORRECTLY 
045752 V.B.A. KIPDR4 SRO WAS EXPECTD TESTNO ERRORPC 
047570 ‘ SREGO, SREGS. WASSRO,$REG2, TESTNO, SERRPC 0 
050133 DF 30 :0,0,0,0,0,0 


3 SR2 oe NOT LOCKUP CORRECT VIRUAL ADDR. 
V.B.A. KIPDR4 SR2 WAS _EXPECTD TESTNO ERRORPC 
‘ SREGO, SREGS eWASSR2 ,SREGS, TESTNO, SERRPC 0 
050133 :0,0,0.0.0,0 


SEEK 


$33 
AuFwun—OoV0en 


ooo 
ahaha) 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


oS 
vw 


042420 EM31 :S$R2 DID NOT LOCKUP CORRECT VIRUAL ADDR. 
:$R2 WAS EXPECTD TESTNO ERRORPC 
WASSR2 S$REG1, TESTNO, SERRPC ,O 

050127 :0,0,0,0 


— 
$2838 
—O0e~ 


5 


042707 EM :SRO OR SR2 CHANGED BY A SECOND ABORT 
046152 sFIRST ABORT SECOND ABORT 

:S$RO WAS SR2 WAS SRO WAS SR2 WAS TESTNO ERRORPC 
047636 :STMPO,$TMP2,WASSRO,WASSR2, TESTNO, SERRPC 0 
050133 :0,0,0,0,0,0 


042754 EM4O >SRO OR SR2 WAS a7! “"RESET’’ BY A RESET 
:SR 0 WAS SR2 WAS TESTNO ERRORPC 
sWASSRO WASSR2, TESTNO, SERRPC 0 
050127 :0,0,0,0 


SSSSsssesssseese 


SsaterRauns=sS 


043023 EM41 :SR2 NOT TRACKING CORRECTLY 
:SR2 WAS EXPECTD TESTNO ERROPC 
sWASSR2,SREG1, TESTNO, SERRPC 0 
050127 0,0,0,0 


St 1TEM 42 


mk en ek aes oe es SS SS oe ss ss a SI SS 
oooo 
Coco 
nN — 


So 
e 
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1085 043056 :01D NOT ig = KERNEL SPACE 
046327 :PSW WAS RO W TESTNO ERRORPC 
047666 ;$REG1,$REG2, TESTNO, SERRPC. 0 
Os01e7 :0,0,0,0 


SE2e 
sg gee - 


043115 EM43 ;KT ERROR NOT SERVICED ON TIMEOUT ERROR 
:POR STNO ERRORPC 
;$REGS, TESTNO, SERRPC 0 

050124 :0,0,0 


st1TEM 44 
043164 EM44 sSRO OR SR2 ee i i ERROR 


046367 DH44 EXPECTED 

7 SR SR2 SRO WAS SR2 WAS TESTNO ERRORPC 
047700 D144 ;$REGO,$REG1 \MASSRO, WASSR2, TESTNO, SERRPC 0 
050133 DF 30 :0,0,0.0,0,0 


s*1TEM 45 
043230 sERROR DURING ‘DOUBLE ERROR’ (KT & ODD ADDR.) 
046501 s EXPECTED: 


PS PC SRO SR2 
ee ven, (3$+4) 020147 (3$) 
: SR2 TESTNO ERRORPC 


SRO 
047716 ‘SREGI, SREG3, WASSRO. UASSR2: TESTNO, SERRPC ,0 
050133 :0,0,0,0,0,0 


st 1TEM 46 
043303 EM46 ths aut 57 wean PUSHED WRONG DATA 


046676 DH46 
sEXPECTD RECEIVD TESTNO ERRORPC 
047734 D146 REGO, SREG1, TESTNO, SERRPC 0 


st ITEM 47 
043346 EM47 sMTPI wet | We LOADED WRONG DATA 
046676 DH46 sDATA DAT 
ZEXPECTD RECEIVD TESTNO ERRORPC 
047734 D146 SREGO,SREG1, TESTNO, SERRPC 0 
050141 DF46 :0,0,0.0 


;*1TEM 50 
043411 Em50 :STACK NOT PUSHED BY MFPI-MTP] 
94 ;TESTNO ERRORPC 
; TESTNO,SERRPC 0 
080148 0,0 


SEZZZZIZE 


$22 


uw WELLE EPO POPE NO PO NIDI NG DID et ot tt tS es oo oO 
SSS KN S SRV RRON SS Sane arun -cBeesnranrcs 


043447 —M51 cere PAGE ACCESSED INSTEAD OF USER: MFPI-MTP] 
SRO WAS SR2 WAS TESTNO ERRORPC 

0 a oASSRO sASSRe TESTNO, SERRPC 0 

050147 :0,0,0,0 


st] TEM 52 
002026 043525 EM sWRONG PDR'S REFERENCED WHILE IN RELOCATE MODE 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
j 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


Sy ee eee ee Le 
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002030 047035 sPHYSICL PAR 4 

sADDRESS V.B.A. PAR 4 SRO WAS SR2 WAS PSU TESTNO 
002032 047766 ;PBALO, VIRT1,SREG4 ,WASSRO,WASSR2 ,STMPO, TESTNO, SERRPC .0 
002034 050155 :3,0,0,0,0,0,0,0 


002036 043603 EMS3 ;MFPD INSTRUCTION PUSHED WRONG DATA 
046676 sDATA DATA 
sEXPECTD RECEIVD TESTNO ERRORPC 
047734 ;$REGO,SREG1, TESTNO, SERRPC 0 
050141 :0,0,0.0 


—_ 
=_ 
- 
ss 


043646 3STACK NOT PUSHED BY MFPD-MTPD 
046753 sTESTNO ERRORPC 

047746 7 TESTNO,SERRPC 0 

050145 30,0 


s*1TEM 55 
043704 EMSS PAR OR PDR WAS CHANGED BY A RESET 
044335 DH11 sREGISTR READ READ-(BINARY) 

ZADDRESS (OCTAL) 5432109876543210 TESTNO ERRORPC 
047304 D111 7 $REGO,$REG1,S$REG1, TESTNO,SERRPC 0 
050052 DF 11 3:0,0,2,0.0 


s*1TEM 56 
EMS6 


PPP AAAAAAA EE SPELL EE 


TASSELS GFERIS SSLFRLUNLSSELSSESA 


:PSwW CHANGED BY AN RTI IN USER MODE 
:PSW WAS EXPECTD TESTNO ERRORPC 

7 $REG1 ,SREG2, TESTNO, SERRPC 0 
002074 050163 :0,0,0.0 


043742 


1 
1 
i 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
j 
1 
1 
1 
1 
1 
1 
1 


a ee ee ed ed ed ed et 
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We -SBTTL *eee2 TRAP HANDLING ROUTINES **eee 
1174 -SBTTL CPU TRAP HANDLER ROUTINE 
1175 s,;eeeeereererrererererrerrrereeererereraraneeneeneeeeneereneneeee 
1176 :* 
1177 3e THIS SUBROUTINE WILL HANDLE ALL CPU TRAPS AND ABORTS THRU 
1178 3° "ERRVEC’’ (LOC. 004). IF THIS SUBROUTINE IS ENTERED BY A 
1179 3° SECOND TRAP BEFORE THE FIRST HAS BEEN SERVICED, A HALT IS 
12 3° EXECUTED. 

- 
1182 MII ITITI Ti itiititiiitiiiititiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiss 
1183 002076 005227 TIMERR: INC (PC)+ sMAKE FLAG ZERO JF FIRST TIME THRU 
1184 002100 177777 TIMFLG: .WORD -1 NEGATIVE ONE FOR “HAVE ENTERED’ FLAG 
1185 002102 001403 BEQ 1$ BRANCH IF FIRST gS IN 
1186 002104 005237 001226 INC SMSGTYPE sTELL APT THERE WAS AN ERROR 
1187 002110 000000 HALT STOP! = I'VE ENTERED THIS ROUTINE 
1188 3A SECOND TIME BEFORE J FINISHED 
1189 sREPORTING THE FIRST ERROR. TH 
1190 sSECOND ENTRY ADDRESS SHOULD BE ON 
1191 ; THE KERNEL STACK. 
1192 002112 012637 001266 1$: MOV (KSP)+,TRAPPC  ;SAVE PC+2 AT TIME OF ABORT 
1193 002116 012637 001270 MOV (KSP)+,TRAPPS ;SAVE PS AT TIME OF ABORT 
1194 002122 010637 001264 MOV KSP ,WASR6 SAVE STACK POINTER VALUE 
1195 002126 104001 ERROR 1 [UNEXPECTED TRAP OR ABORT TO LOC. 4 
1196 002130 012737 177777 002100 MOV #-1, TIMFLG MAKE FLAG NEGATIVE ONE FOR NEXT TIME 
1197 002136 013746 001270 MOV TRAPPS,-(KSP) ;PUT PC & PS OF TRAP ON STACK 
1198 002142 013746 001266 MOV TRAPPC ,~(KSP) 
Hh 002146 000006 RTT sRETURN FROM INTERRUPT OR ABORT 
1201 
1202 -SBTTL MEMORY MANAGEMENT TRAP HANDLER ROUTINE 
1203 pp eeeeeereererrereeereerererereeeeeeeeeKenAAeAeeeeKeKARKAKeeeAeee 
1204 hd 
1205 ;# THIS SUBROUTINE WILL HANDLE ALL UNEXPECTED MEMORY MANAGEMENT 
1206 ;e TRAPS AND ABORTS THRU "MMVEC'’ (LOC. 250). IF THIS SUBROUTINE IS 
1207 3@ ENTERED BY & SELOND TRAP BEFORE THE FIRST HAS BEEN SERVICED, A 
4 :* WALT IS EXECUTED. 

°« 
1210 t  eeeeeereerreeeereerereereeeeeeeereeeeeeeneneeereereeeeeeeererts 
1211 002150 005227 MGMERR: INC (PC)+ ; MAKE teal a IF FIRST TIME THRU 
1212 002152 177777 - MGMFLG: .WORD -=1 ;NEGATIVE ONE FOR “WAVE ENTERED’ FLAG 
1213 002154 001403 BEQ 1$ sBRANCH IF PIRST T 2” IN 
1214 002156 005237 001226 INC SMSGTYPE ; TELL APT THERE WAS AN ERROR 
1215 002162 000000 HALT :STOP! = I'VE ENTERED THIS ROUTINE 
1216 :A SECOND TIME BEFORE 1] FINISHED 
1217 sREPORTING THE FIRST ERROR. THE 
1218 ;SECOND ENTRY ADDRESS SHOULD BE ON 
1219 THE KERNEL STACK. 
1220 002164 012637 001266 1$: MOV (KSP)+,TRAPPC SAVE PC42 AT TIME OF ABORT 
1221 002170 012637 001270 MOV (KSP)+,TRAPPS  ;SAVE PS AT TIME OF ABORT ‘ 
1222 002174 010637 001264 MOV KSP ,WASR6 sSAVE STACK POINTER VALUE ’ 
1225 002200 013737 177572 001272 MOV m0. ae sSAVE CONTENTS OF KT STATUS REG. 0 
1224 002206 013737 177576 001274 MOV SR2 ,WASSR2 ;SAVE CONTENTS OF KT STATUS REG. 2 
1225 002214 042737 160000 177572 BIC 7166000; SRO :CLEAR ERROR BITS IN STATUS REG 0 
1226 002222 104002 ERROR 2 sUNEXPECTED TRAP OR ABORT TO LOC. 250 
1227 0022246 012737 177777 002152 MOV #-1 ,MGMFLG ;MAKE FLAG NEGATIVE ONE FOR NEXT TIME 
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1228 002232 013746 001270 


22 
1229 002236 013746 001266 
et 002242 000006 
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MEMORY MANAGEMENT TRAP HANDLER ROUTINE 


MOV 
MOV 
RTT 


TRAPPS ,-(KSP) 
TRAPPC ,-(KSP) 


Pui PC & PS OF TRAP ON STACK 


RETURN FROM INTERRUPT OR ABORT. 


SEQ’ 0026 


i 
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ooooo 
TQ a oe ot oe 
=—MMrrmormuw 


o —™~N 
NNO! RNNYNNO 


oooo 
— = O—- 
mror 


001100 
001140 


034122 
000340 


000002 
020174 


020220 
000004 
020266 
177570 
177570 
177777 
020274 


000176 
000174 
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000026 
033676 
001115 
000014 


000010 


034122 
000010 


001106 
001110 


000004 


~SBTTL 
-SBTTL eee STARTING POINT OF TEST *eene 
orto seeee STARTING ADDRESS OF 200 *eeee 


START: 
-SBTTL INITIALIZE THE COMMON TAGS 
>: CLEAR ben COMMON TAGS (SCATAG) AREA 
@SCATAG,R6 s:FIRST LOCATION TO BE CLEARED 
(R6)+ ::;CLEAR MEMORY LOCATION 
2 pe oR6 ; DONE? 


;LOOP BACK IF NO 
#STACK,SP SETUP THE STACK POINTER 
5 SINITIALIZE A FEW VECTORS 
MOV #SSCOPE ,a# 1OTVEC fb VECTOR FOR SCOPE ROUTINE 
#340 ,a#1OTVEC+2 ;;LEVEL 7 
MSERROR -OFENTVEC :7E HEM 1 VECTOR FOR ERROR ROUTINE 
+ sok 
#STRAP ,ASTRAPVEC iT TRAP VECTOR FOR TRAP CALLS 
8340 ,Q#TRAPVEC+2;LEVEL 7 
#SPURDN BF OURVEC tite ny FAILURE VECTOR 
#340, QsPURVEC? 2 sel 
SENOCT SEOPCT SEY UP END-OF PROGRAM COUNTER 
STIMES ::INITIALIZE NUMBER OF ITERATIONS 
eo + CLEAR THE ESCAPE ON ERROR ADDRESS 
MOVB #1, SERMAX ;ALLOW ONE ERROR PER TEST 
ne ee THE BIT TRAP VECTOR. os LOAD ne SSRTRN’, IN 
77 THE “END-OF-PASS"’ (SEOP) ROUTINE, WITH A "RTI" OR “RIT” 
MOV #SRTRN AFTBITVEC Hy te ne ait VECTOR TO $RTRN 
#340, a0 TBITVEC*2 ;;LEVEL 7 
RTI, SRTRN :3SET SRTRN Mg A RTI 
#658 OARESVEC ee TRY “y Ag RTT 
#648, -(SP) $$ AND PC 
sTRY THE RTT 
64$: rt a »SRTRN ::;RTT 1S LEGAL--SET SRTRN TO A RTT 


65$: #10,S sRTT ILLEGAL“-CLEAN OFF THE STACK 
66$: aReSVECS2, annesvit 2 RESTORE TRAP CATCHER 
$TBIT sCLEAR ''T'’ BIT SWITCH 
4. oe : INITIALIZE THE LOOP ADDRESS FOR SCOPE 


MOV #. SLPERR ;SETUP THE ERROR LOOP ADDRESS 
:SIZE FOR A HARDWARE SWITCH REGISTER. IF NOT FOUND OR IT 1 
;;EQUAL TO A ‘=1"', SETUP FOR A SOF TWARE SWITCH REGISTER. 

MOV a#ERRVEC,- ; E ERROR VECTOR 


#678 , @#ERRVEC TOR 
E SWiCH A ea 


HOSUR, SUR P DWAR 

#DDISP DISPLAY 1 EAND A HARDWARE DISPLAY REGISTE 

#-1 SUR cs TRY TO REFERENCE HARDWARE SwR 

69$ ;;BRANCH IF NO TIMEOUT TRAP M's on 
+ sAND THE HARDWARE SWR IS NOT = -1 

68$ ;BRANCH IF NO TIMEOUT 

#68, (SP) SET UP FOR TRAP RETURN 


#SWREG, SWR ;:POINT TO SOFTWARE SWR 
#D1SPREG, DISPLAY 


SEQ 0027 ° 
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020310 012637 000004 698: (SP)*,@#ERRVEC ;;RESTORE ERROR VECTOR 


020314 005 001234 CLR SPASS +;CLEAR PASS COUNT 
000200 001247 MAPTSIZE,SENVA ;;TEST USER SIZE UNDER APT 
Q 7:YES,USE NON-APT SWITCH 
001250 001140 #@SSWREG, SUR 7;NO,USE APT SWITCH REGISTER 


70$: 

-SBTTL TYPE PROGRAM NAME 

7: TYPE THE NAME OF THE PROGRAM IF FIRST PASS 
INC a-1 ssFIRST TIME? 


SEQ 0028 


BESSSS 


Us 


177777 mt] 
034054 000042 #SENDAD ,0#42 

Q 71$ 3 BRANCH 
020422 TYPE 12s 7: TYPE ASCIZ STRING 
GET VALUE FOR SOFTWARE SWITCH REGISTER 
000042 TST a442 53 


WE RUNNING UNDER XXDP/ACT? 
001246 000001 eeu at 3;ARE WE RUNNING UNDER APT? 


Mmrnrnr 


3 


73$ S:BRANCH IF YES 
::BRANCH IF YES 
001140 000176 SUP , MSWREG S:SOFTWARE SWITCH REG SELECTED? 
74% : BRANCH 
S:GET SOFT=SWR SETTINGS 


000403 BR 74$ 

112737 000001 001134 738: #1, SAUTOB ::SET AUTO-MODE INDICATOR 

000420 -— oe 71$ :;GET OVER THE ASCIZ 
5728: SASCIZ <CRLF>#MD-11-CUKDA-A F-11 MMU DIAG. #<CRLF> 
RESTRT: 


: WITTTIITITILIT LITT LEE 
7THE FOLLOWING TURNS ON A TIMER ON THE MULTI-OPTION TESTER 
3 IN MANUF ACTORING. 


020504 000004 TIMEON: MOV #LOOP ,a#4 ;SETUP RETURN ADDRESS IN CASE OF TIMEOUT 
000006 MOV #340,a%6 ;SETUP PSW 
164000 MOV #2 88164000 :SET START BIT IN MULTI-TESTER 


FERRARA AAAAAA AAAS AAAE AAA AAA AAA AA EH AKER RAAAAAAAAAAAAKARE ARATE AAS 


LOOP : #@STACK ,KSP INITIALIZE THE STACK POINTER 
000004 @TIMERR,ERRVEC ;LOAD CPU SERVICE ROUTINE INTO TRAP VECTOR 
#340,ERRVEC+2  ;SET NEW PS TO PRIORITY LEVEL 7-KERNEL 
#AGMERR .AMVEC ;LOAD MEMORY MANAGENT ROUTINE INTO VECTOR 
#340 ,MAVEC+2 ;SET NEW PS TO PRIORITY LEVEL 7-KERNEL 
#-1,R0 ;PUT_ =-1 INTO RO TO INITIALIZE FLAGS 
RO, TIMFLG s INITIALIZE CPU ERROR FLAG 
RO, MGMFLG INITIALIZE MEMORY MANAGEMENT ERROR FLAG 
001276 #340, TBI TPS INITIALIZE LOG THAT HOLDS T-BIT PSW 
SRO ;BE SURE MEM. MGMT IS OFF TO START WITH 


ve] ee eee ee eee ie ie ie) 
SRENENERORNS SSS ees seeessssssses 
~ AN 


SSSSESLUNSSSSSONSRRUNn LS omnes anraun—-o 


000252 


Soooooooo°oo 
ek a a a te 
eee 
on 


020562 177572 
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_ 
ws 
wo 


SRR AAAHAAAAAAKAA STEAK A AAHA KAKA AAAAAAARAAAAAAAAAAAAAAAAEAee 


#TEST 1 PSW PRIORITY BIT TEST 
- 


THIS TEST READS AND WRITES THE PROCESSOR STATUS WORD <7:5> ‘PRIORITY BITS" 
TO SEE THAT SOME OF THE BASIC "DATA PATH’ LOGIC IS WORKING. 


MmARBAAAZALAASLALALAAA AAAS E RAE SEER RARER ARERR RAR SS 


;* 
4 
:* 
TST1: 
1$: #2$,SLPERR ;SET LOOP ON ERROR POINTER TO 2$ 
RO sINITIALIZE RO WITH PRIORITY=0 DATA 
2s: R1 :PREPARE R1 TO ACCEPT DATA READ 
RO ;WRITE PRIORITY BITS IN THE PSW 
R1 ;READ BACK THE LOW BYTE OF PSU 
177437 #177437,R1 ; MASK OFF EVERYTHING EXCEPT PRIORITY BITS 
RO.R1 sWAS CORRECT PRIORITY SET IN THE PSW? 
3 ;BRANCH IF YES 
3 ie BITS SET WRONG IN PSW 
sFOR TIGHTER SCOPE LOOP 
:REP LACE ERROR CALL WITH 
‘BR 2$" = 000770 
000040 : #40,R0 ; CHANGE DATA TO NEXT PRIORITY 
000400 #400,RO SHAVE PRIORITIES O-7 ALL BEEN CHECKED? 
020570 001110 #1$,SLPERR sRESET LOOP ON ERROR POINTER TO 1$ 


FFU AAAA EEA RE HAA AAAAETAAA AAA AA AAA AAAAAAEAAAAAAAAAAAARAAAARAAAAe 


s*TEST 2 PSW MODE BIT TEST 
; THIS TEST READS AND WRITES THE PROCESSOR STATUS WORD <15:12> ‘MODE BITS"’ 


EFFESEFSEEES 


PATA 
FALUN AS OBNGARUN—O 


020600 001110 


WAM AW AAA 
Ww 
son 


Eses 


33 


020652 001110 1$: #2%,SLPERR ;SET LOOP ON ERROR POINTER TO 2$ 
RO ‘INITIALIZE RO WITH MODE BITS = 0000 
177776 ; PSw S INITIALIZE PSW 
RO,PSW ‘BIT SET THE PSW MODE BITS WITH RO 
MOV PSW,R1 :READ BACK THE CONTENTS OF THE P 
007777 #007777,R1 ;MASK OFF EVERYTHING EXCEPT. THE MODE BITS 
RO,R1 SWERE THE MODE BITS SET CORRECTLY? 
3$ SBRANCH IF YES 
177776 CLR PSw CLEAR Psu FOR ERROR REPORT 
4 ‘MODE BITS SET WRONG IN Psu 
“FOR TIGHTER SCOPE LOOP 
7RE PLACE ERROR CALL WITH, 
: "BR = 000763 
010000 : #10000,R0 nee MODE BIT DAT 
“ SBRANCH IF STILL NORE COMBINATIONS 
020642 001110 #1$,SLPERR SRESET LOOP ON ERROR POINTER- 10 1$ 
020720 177776 PSW [RESET PSW BEFORE LEAVING - 


peteeeeerererrerrereeeeereeeeteeteteteReeekeeeeeKeeeeeKeReAAe eee 


:#TEST 3 BYTE ADDRESSING TEST FOR PSW 


THIS TEST WRITES THE HIGH AND LOW BYTES OF THE PROCESSOR STATUS WORD 
AND READS THEM BACK TO BE SURE THEY CAN BE WRITTEN #NDEPENDENTLY. 


pees 
NOWUFWN OO 


SANN 
Oe 


SSESSFSESS 


8 


Www 
000 
un 
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1 
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1 
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1 
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1 
{ 
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1366 
1367 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
j 
1 
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w 
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020724 


020734 001110 18: MOV #2%,S$LPERR ;SET LOOP ON ERROR POINTER TO 2$ 
177776 : PSW [CLEAR THE PSW 
#360,R0 [PUT THE HIGH BYTE DATA INTO RO 
RO,PSw+1 :WRITE THE HIGH BYTE OF THE PSW 
PSU,RI D BACK THE ENTIRE Psu 
#007437,R1 cmASR OFF THE T & CC BITS 
RO [GET DATA WRITTEN in aiGN BYTE OF RO 
RO,R1 [WAS THE PSW WRITTEN TO CORRECTLY 
3$ ‘BRANCH IF YES 
020766 177776 CL PSw [CLEAR PSW FOR ERROR REPORT 
020772 104005 5 :LOM yTE EFFECTED BY WRITE TO HIGH BYTE OF PSwW 
[FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
:"BR 28" = 0007 


020774 021002 001110 38: Hus, SLPERR *SET LOOP ON ERROR POINTER TO 4$ 
0050 i$: PSW [CLEAR THE PSW 
#340,R0 :PUT THE LOW BYTE DATA INTO RO 
RO, Psu SWRITE THE LOW BYTE OF THE PSW 
PSW,R SREAD BACK THE ENTIRE PSW 
F00437 .R1 [MASK OFF THE TE&CC BITS 
RO,R1 7 WAS PSw WRITTEN TO CORRECTLY 


SSSSFS=SS 


5$ 
177776 PSW 


>CLE SW FOR ERROR REPORT 
HIGH BYTE EFFECTED BY WRITE TO LOW BYTE OF PSW 
sFOR TIGHTER SCOPE LOOP 


L 
; REPLACE ERROR CALL WITH 
“BR 2$"' = 0007 
021040 020726 001110 5$: #1S,SLPERR ;RESET LOOP ON ERROR POINTER TD 1% 


SRARAAAAEEAATA TAA AE TARE TATE RETAKE AAAAAAAAAAAAAAAAAERAAAAARAAAAAEe 


:#TEST 4 TEST AND SETUP OF STACK POINTERS 


ie THIS TEST SETS THE USER AND KERNEL STACK POINTERS FOR “i. 

;* REST OF THE PROGRAM AND MAKES — THEY ARE INDEPENDENT 

3 EACH OTHER. KERNEL R6 IS SET TO 1100, USER R6 IS SET to. 700, THEN 
;* KERNEL R6 IS READ TO BE SURE 18 STILL 1100. 
* 

i$ 


seeeerereerererrerreereserereeeeereeseeeneeeeeeereeeeeeeeeeeeeee 
T4: 
177776 CLR PSW 3:60 TO KERNEL MODE 
M #KERSTK ,KSP ;SET KERNEL STACK POINTER TO 1100 
177776 #140000 ,PSW :G0 TO USER 
MO #USESTK ,USP SET USER STACK POINTER TO 700 


PSW 

#KERSTK ,KSP 
001100 #KERSTK RO 

KSP,R1 


’ vE U 
ERROR 6 ;KERNEL R6 CHANGED BY WRITING USER R6 
;FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
;000756 


SSsasss 


$s 
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021114 
021116 


021162 
021166 
021170 


021174 
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4:38 


000002 
172516 
021116 
001304 
002076 


000004 


001302 


001300 
001304 
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001110 
000004 


001300 


001110 


000004 


31 
TEST AND SETUP OF STACK POINTERS 


seerererrteraeaeeerereerererereereeeraererereetenaeeeearekeeeeeeee 


THE NEXT FIVE (5) TESTS WILL TRY TO ADDRESS ALL OF THE 


OUT DURING T 

THEIR oot IS GIVEN TO SHOW WHICH ADDRESS LINES MAY BE 
STUCK AT 0 OR 1. THE PAR/PDR ADDRESS AND KT MUX'S ARE THE 
THINGS BEING CHECKED. 


—PARRBAAAAAAAAALASLALALALALEALE SELES ALES E SESE ERE RAE EEE ER AREAS SG 


oe 
-f 
-f 
2 
-« 
-@ 
-v 
-@ 
°* 
-@ 
-« 
e 


PAAR AA EAA AA EAA AAA EATER AEA AERA AAA AAA AAAAAAREHAEAARAAAAAAAAAAES 


#TEST 5 SRO,SR1,SR2,SR35 TIMEOUT TEST 


ie THIS TEST . Nam. THE MEMORY MANAGEMENT STATUS REGISTERS 
;* ole ND 3. STATUS REG. 1 IS NOT USED BUT SHOULD STILL 

;* RESPOND TO 17S UNIBUS ADDRESS. DATA WILL BE WRITTEN OR READ 
;* FROM THESE REGISTERS IN LATER TESTS, THIS TEST JUST CHECK 

; FOR A RESPONSE. 
- 
is 


MARAALALAAASAALASALLALALAL ESSA EARS E RATER ERE RRR E REE RRR R RAS SE 


15: 


1$: #2$,SLPERR ;SET LOOP ON ERROR POINTER TO 2% 
#5$ 084 SET TIMEOUT VECT 
#SRO,RO ; LOAD RO WITH ADDRESS OF FIRST REG. 
#3,R1 HE LOOP COUNT 
#-1,ANDAOR 
ORADR 
TONUA S INITIALIZE “TIMEOUTS TER 
(RO) TRY ADDRESSING A STATUS REGISTER 
s1F_ IT TIMES OUT * TO 5$ 
#2,R0 PUT NEXT aa ey IN RO 
R1,2$ sLOOP BACK TO 2$ UNTIL ALL TESTED 
a#172516 ; CHECK rr fOr RESPONSE 
:1F IT TIMES OUT GO TO 5$ 
#1$,SLPERR ;RESET LOOP ON ERROR POINTER TO 1$ 
TONUM :D1D ANY OF THE STATUS REG.S TIMEOUT? 
BRANCH IF NO 
10 :SUMMARY OF STATUS REG. TIMEOUTS 
#TIMERR 244 sRESTORE NORMAL CPU TRAP ROUTINE ADDRESS 
TST6 2:60 TO NEXT TEST 


#4 ,KSP :CLEAN UP THE STACK 
7 sONE OF THE STATUS REGS. TIMED OUT 
:FOR TIGHTER SCOPE LOOP 
; REPLACE ERROR CALL WITH 
;"BR 28" = 000756 
RO,R2 LOAD, THE “ADDRESS THAT TIMED OUT INTO R2 
R2,ORADR :'OR" IT WITH OTHER ADDRS. THAT TIMED OUT 
:“AND' IT WITH OTHER ADDRS. THAT TIMED OUT 
R2, ANDADR 
TONUM 


; INCREMENT THE TIMEOUT COUNTER 


=e Be Be Oe Be Be Be 


MEMORY MANAGEMENT REGISTERS (SRO,SR1,SR2,SR3,KERNEL & USER PAR/PDR'S). 
REGISTER TIMES OUT ITS ADDRESS WILL BE REPORTED 


SEQ 0031 
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1507 021250 000744 BR 38 BRANCH BACK TO TEST THE NEXT ADDR. 


seeeerererererereereerererreteeeeereereeeeeeesTenAkeReeeReeeeeees 


:STEST 6 KERNEL PAR'S TIMEOUT TEST 


- 

se THIS TEST ADDRESSES THE EIGHT (8) KERNEL PAGE ADDRESS 
- REGISTERS (KIPARO-KIPAR7) AND CHECKS THAT SOMETHING 
:e RESPONDS TO THEIR ADDRESSES. 
* 

is 


38 


RATA HAKETAAAAAAAAAAAAAAEAAATATAAAAAAAAAAAAAAAAAAAARARAARAEARAERAAEAAE 


021252 T6: 


021254 021316 001110 18: #2$,SLPERR ;SET LOOP ON ERROR POINTER TO 2$ 
000004 #5$,a84 ;SET TIMEOUT VECTOR TO 5$ 
ot ; LOAD RO WITH ADDRESS OF ah REG. 


#10,R 
001300 #-1,ANDADR 
ORADR 
001304 TONUM 
021316 : (RO) 


; IMES 
021320 2700 000002 : #2,R0 ;PUT NEXT KIPAR ADDRESS IN 
R1,2$ ;LOOP BACK TO 2$ UNTIL ALL TESTED 
021254 001110 #1$,SLPERR ;RESET LOOP ON ERROR POINTER TO 1$ 
001304 TONUM :D1D ANY OF THE KIPARS TIME OUT? 
4% sBRANCH IF NO 
10 SUMMARY OF KIPAR TIMEOUTS 
021344 002076 000004 : MO #TIMERR 284 ;RESTORE NORMAL CPU TRAP ROUTINE ADDRESS 
021352 00041 TS17 3360 TO NEXT TEST 


021354 062706 000004 : DD #4 ,KSP ;CLEAN UP THE STACK 
021360 104007 7 a OF THE KIPARS TIMED OUT 
:FOR TIGHTER SCOPE LOOP 
; REPLACE ERROR CALL WITH 
"BR 2$"' = 0007 
RO,R2 LOAD, THE “ADDRESS THAT TIMED OUT INTO R2 
001302 R2,ORADR :‘‘OR'’ IT WITH OTHER ADDRS. THAT TIMED OUT 
R "AND" IT WITH OTHER ADDRS. THAT TIMED OUT 
001300 R2,ANDADR 


001304 TONUM ; INCREMENT THE TIMEOUT COUNTER 
021402 0007 3$ ;BRANCH BACK TO TEST THE NEXT KIPAR 


ppereeeareeeerrereeereAeeeeeeeeeeeeeAeeeAeAeeKeRIKeeeeeKAKKeeAAee 


s*TEST 7 KERNEL POR'S TIMEOUT TEST 


-* 

;* THIS TEST ADDRESSES THE EIGHT (8) KERNEL PAGE DESCRIPTOR 
;* REGISTERS (KIPDRO-KIPOR7) AND CHECKS THAT SOMETHING 

;* RESPONDS TO THEIR ADDRESSES. 
°@ 
§ 


OOnCYUFwN—o 


RPRIMIPINIPINIPIRINYRD A a 
SOnOVFWN—O 


Sb sbesbedh dh Ab Ab dh Ab Ab AD Ab Ab AD AD AD AD AL AL AA AD AA AL Ah ah Ah ah Ah Ah Ade abe ale al 
SEVERE S 
NOW Wit 


SSS 


PPAnmnwnw 
5S 


vw 
ons 


MPR REASEASESELEALE SEES ESSERE E REAR EERE EE RRR R RRR R RASA RR RRR RAE SD OS 


021404 17: SCOPE 


021406 001110 1$: #23, SLPERR :SET LOOP ON ite POINTER TO 2$ 
000004 #5$,a84 :SET TIMEOUT VECTO $ 
0 #K1PDRO,RO ;LOAD RO WITH ADDRESS OF FIRST REG. 
021426 #10,R1 ;LOAD R1 WITH LOOP COUNT (8) 


PAAMAANMAIA 
OOF wFwnr—-oV0e~ 


i 


Sse 


1 
1 
1 
1 
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1 
1 
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1 
1 
1 
1 
1 
1 
1 
| 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
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1 
1 
1 
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1 
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1 
1 
1 
1 
1 
1 
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PDD AAAAAAAAAR 


oo 
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021432 177777 001300 #-1 ,ANDADR ALIZE *‘AND’’ OF ADDR. LOC 
001302 ORADR ; ALIZE “‘OR"’ OF ADDR. LOC. 
051480 001304 ALIZE “‘TIMEQUTS'’ COUNTER 


021452 000002 
;LOOP_ BACK 


R1,28 
021406 001110 sRESET LOOP ON ERROR POINTER TO 1$ 
001304 TONUA :D1D ANY OF THE KIPORS TIME OUT? 
4% BRANCH IF NO 
10 SUMMARY OF KIPDR TIMEOUTS 
002076 000004 : MO STIMERR 284 [RESTORE NORMAL CPU TRAP ROUTINE ADDRESS 
TST10 3:60 TO NEXT TEST 


000004 : ADD #4 ,KSP ;CLEAN UP THE STACK 
7 ONE OF THE KIPDRS TIMED OUT 
:FOR TIGHTER SCOPE LOOP 
;REPL ACE ERROR CALL WITH 
:"BR 2$"* = 00075 
021514 RO,R2 ; LOAD, THE "ADDRESS THAT TIMED OUT INTO R2 
001302 R2,ORADR 7‘OR’’ IT WITH OTHER ADDRS. THAT TIMED OUT 
R2 :“AND'' IT WITH OTHER ADDRS. THAT TIMED OUT 
001300 R2,ANDADR 


001304 TONUA ; INCREMENT THE TIMEOUT COUNTER 
3$ ;BRANCH BACK TO TEST THE NEXT KIPDR 


Se 


WSONGOULSWN—O”O 
o— 
— 
wr 


3 


z 


ae be 
— 
g 
S 
~N 


0215 
021512 


PAPA AAAAAMIN 


2s 
_ 


FRRAAAAAAAAA ATTA AA AAA ATTA AAA AAA A AAA AATERAAARAAEEAAAARAAHERAEE 


eTEST 10 USER PAR’S TIMEOUT TEST 
-® 


THIS TEST ADDRESSES THE EIGHT (8) USER PAGE ADDRESS 
REGISTERS (UIPARO-UIPAR7) AND CHECKS THAT SOMETHING 
RESPONDS TO THEIR ADDRESSES. 


SEERA AAAAEAAEAAAAEAAAAEAAAATAAAAAAEAAAAAAAAAAAAEARAEAAETAAAAAAE 


021536 : SCOPE 


021540 021602 001110 : #2$,SLPERR ;SET LOOP ON ERROR POINTER TO 2$ 
000004 #53084 ;SET TIMEOUT VECTOR TO 5$ 
#UIPARO,RO ; LOAD RO WITH ys ae A yyy REG. 


001300 #-1. ANDADR 
ORADR 


001304 TONUM 
(RO) 


71F MES OUT, 

000002 : #2,R0 ‘PUT NEXT UIPAR hopaess” wR 

R1,2$ LOOP BACK TO 2$ UNTIL ALL TESTED 
021540 001110 #1$, SLPERR :RESET LOOP ON ERROR POINTER TO 1$ 
001304 TONUM 3D1D ANY OF THE UIPARS TIME OUT? 

4 BRANCH IF NO 

10 ;SUMMARY OF UIPAR TIMEOUTS 
002076 000004 : #TIMERR ,aa4 sRESTORE NORMAL CPU TRAP ROUTINE ADDRESS 

TST11 3:G0 TO NEXT TEST 


021640 000004 : ADD #4,KSP ;CLEAN UP THE STACK 
021644 104007 ERROR 7 ;ONE OF THE UIPARS TIMED OUT 
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sFOR TIGHTER SCOPE LOOP 
; REPLACE ERROR CALL WITH 
;"BR 28" = 000756 


MOV RO,R2 ;LOAD THE “ADDRESS THAT TIMED OUT INTO R2 
001302 R2,ORADR FoR’ IT WITH OTHER ADDRS. THAT TIMED OUT 

On :“AND' IT WITH OTHER ADDRS. THAT TIMED OUT 
001300 R2 ,ANDADR 


001304 TONUA : INCREMENT THE TIMEOUT COUNTER 
B 3$ ;BRANCH BACK TO TEST THE NEXT UIPAR 


FRA RHAA AAA AEAA AAA AAAEA ASHE AEAAAAAAEAEAAEHAAAAAAAAAAAAEE 


 eTEST 11 USER POR'S TIMEOUT TEST 


;* 

ie THIS TEST ADDRESSES THE EIGHT (8) USER PAGE DESCRIPTOR 
> REGISTERS (UIPDRO-UIPDR7) AND CHECKS THAT SOMETHING 

;* RESPONDS TO THEIR ADDRESSES. 
-* 
i$ 


SHREK AAAAAAAAAAAAATEARALAEAKAAAKAAAAAATAKAAAAAARAATAAARAAARAAARAARAAARAAEE 


021670 SCOPE 


021672 021734 001110 18: #2$,SLPERR ;SET LOOP ON ERROR POINTER TO 2% 

021700 000004 #5$,a84 ;SET TIMEOUT VECTOR TO 5$ 
#UIPDRO,RO ; LOAD RO WITH ADDRESS OF FIRST REG. 
#10,R1 P COUNT (8) 


001300 #-1 ,ANDADR 
1302 ORADR 
001304 TONUA 
(RO) 4H 


000002 : #2,R0 PUT NEXT UIPDR ADDRESS IN RO 
R1,2$ ;LOOP BACK TO 2$ UNTIL ALL TESTED 
021672 001110 #1$,SLPERR ;RESET LOOP ON ERROR POINTER TO 1$ 
001304 TONUM :D1D ANY OF THE UIPDRS TIME OUT? 
4$ sBRANCH IF NO 
10 ; SUMMARY OF UIPDR TIMEOUTS 
002076 000004 : #TIMERR ,ae4 RESTORE NORMAL CPU TRAP ROUTINE ADDRESS 
021770 00041 TST12 ::60 TO NEXT TEST 


021772 000004 : #4 ,KSP ;CLEAN UP THE STACK 
021776 ? sONE OF THE UIPDRS TIMED OUT 
sFOR TIGHTER SCOPE LOOP 
sREPLACE ERROR CALL WITH 
"BR 28" = 000756 
RO,R2 LOAD, THE ADDRESS THAT TIMED OUT INTO R2 
001302 R2,ORADR ‘OR’ IT WITH OTHER ADDRS. THAT TIMED OUT 
;“AND' IT WITH OTHER ADDRS. THAT TIMED OUT 
001300 R2,ANDADR 


001304 TONUM ; INCREMENT THE TIMEOUT COUNTER 
022020 000746 3$ :BRANCH BACK TO TEST THE NEXT UIPOR 


SSSSPETEESES 


See RHA AAEAAEAAAAAAETEAAATAAAEKEAeKeRAeeAskeeeeeeeekeeeKereeee 


S*TEST 12 $RO(15:13) BIT TEST & SR2 TEST 
°f 


THIS TEST CHECKS BITS <15:13> OF STATUS REGISTER 0 TO SEE 
THAT EACH CAN BE SET AND CLEARED AND THAT A “'RESET'’ WILL 
CLEAR ALL OF THER. 


ee ee ss Ht Ws es os tt 
eeeset 
Fwn-oo 
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$RO(15:13) BIT TEST & SR2 TEST SEQ 0035 


THE REST OF BITS IN og he BE CHECKED LATER. 
ALSO CHECK THAT SR2 IS TRACKING WITH MEM. MGMT. 
OFF BUT LOCKS UP WHEN any “OF SRO ERROR BITS SET. 


—BARAAAAARARAARAALALASSLAALLALALELELASAL ALE LEE ESAT REESE R EE RAE ES SY 


022022 : SCOPE 


022024 177572 : MOV #SRO,RO sLOAD ADDRESS OF SRO INTO RO 
160000 MOV #160600, (RO) sSET BITS <15:13> IN SRO (ERROR BITS) 
RESET ;1SSUE AND ‘INIT’ SIGNAL 
MOV (RO) ,R1 ;READ SRO INTO R1 TO SEE IF CLEAR 
23 ;BRANCH IF SRO<15:13> CLEARED BY "INIT" 
11 ;S$RO<15:13> NOT CLEARED BY A "RESET" 
FOR TIGHTER SCOPE LOOP 
:REPLACE E ERROR CALL WITH 
022052 #2$,SLPERR 


:SET LOOP ON TR POINTER TO 2% 
177576 : SR2,WASSR2 READ CONTENTS OF 
022052 #2$,R1 ;LOAD EXPECTED CONTENTS INTO R1 
001274 R1,WASSR2 :1S SR2 TRACKING? 
3$ ;BRANCH IF YES 
022072 41 :SR2 NOT “*TRACKING’’ VIRTUAL ADDRESSES 
;FOR TIGHTER SCOPE LOOP 
: REPLACE ERROR CALL WITH 
‘BR 28°" = 000767 
#4% ,SLPERR SET LOOP ON ERROR POINTER TO 4$ 


SEREEEEEESS 


8 


022074 022112 001110 


oS 


022124 


ooo 
— 


0-0 uU"MNn nn 


or-— 


-oNNsN 


SSs8=f33a 


Scee 
Nuew 
NM—NwNOOW—~w 


— 
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100000 
000003 


#B1T15,R1 
#3,R5 


(RO) 
R1, (RO) 
(RO) ,R2 
1,R2 


6 
12 


:PUT DATA Hs = WRITTEN IN RI 
SETUP R3 A LOOP COUNTER 

SCLEA AR SRO 

:SET ONE OF i ae BITS IN SRO 


sREAD SRO_INTO 


:D1D RIGHT ERROR BIT GET SET? 
;BRANCH IF YES 





17 
7 
7 
7 
7 
7 


SELF 


BITS WERE SET WRONG IN SRO 
sFOR TIGHTER SCOPE LOOP 
:REPLACE E ERROR CALL WITH 


07 
022126 022114 : #5$,R4 LOAD EXPECTED CONTENTS OF SR2 IN R4 
022132 3737 001274 SR2,WASSR2 sREAD SR2 

022140 020437 001274 R4 ,WASSR2 DID SR2 a WHEN ERROR 


022144 001401 BE 7$ 
022146 104064 64 


sco 
REPLACE ERROR CALL WITH 
"BR 4$" = 000761 
022150 006001 : R1 ; CHANGE DATA TO CHECK NEXT ~— BIT 
077321 R3,48 ;LOOP BACK UNTIL <15:13> ALL TESTED 
SEs (RO) CLEAR SRO BEFORE LEAVING 


022156 022024 001110 #1$,SLPERR ;RESET LOOP ON ERROR POINTER TO 18 


ppeeteeeeeeeerererereeeererereeeeeeeereeReReeAeeKeaKeKeeKeeeeeee 


s*TEST 13 SRO & PSW DUAL ADDRESSING TEST 
‘ 


THIS TEST CHECKS MORE OF THE ADDRESS DETECTION 
VERIFYING THAT STATUS REGISTER 0 IS NOT EFFECT 


SQN NS 
POMe Na NANO NO NONE — es A A 
SSHBNONRMV—“COBNOnRWN—O 


OGIC BY 
ED BY WRITING 
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TO THE PSW AND THAT THE LOW BYTE OF STATUS REGISTER 0 
1S NOT EFFECTED BY WRITING TO ITS HIGH BYTE. THIS IS TO 
SEE IF ADJACENT OUTPUTS ARE SHORTED ON THE ADDRESS DET. LOGIC. 


SRERHHRAHAKHHHTHKAKAKEKEKAAEHKAAAAAAAARAAARAAAAAAARAAAAAEAAAARERIAee 


$113: SCOPE 


1$: sCLEAR THE PSW 

:CLEAR STATUS REGISTER 0 
:SET PRIORITY 7 IN LOW BYTE OF PSW 
;READ STATUS REGISTER 0 

022206 2 :BRANCH IF IT WAS STILL O 

022210 sSRO EFFECTED BY A WRITE TO THE PSW 
sFOR TIGHTER SCOPE LOOP 
: REPLACE ERROR CALL WITH 
:"BR 18°" = 000767 

022212 2$: ;BE SURE $RO 1S 0 BEFORE LEAVING 

022216 ;BE SURE PSW IS 0 BEFORE LEAVING 


FREER ARER AAA E EA AAAAAEEAEAAAA AAA AAA AAKEAAAAAAARAARAAARRAAAEe 


SSTEST 14 TEST THAT SR1 READS ALL ZEROS 
;* 


THIS TESTS CHECKS THAT STATUS REGISTER 1 
RESPONDS WITH ALL ZEROS, AND THAT ONLY BITS<5:4> 
OF STATUS REGISTER 3 ARE WRITEABLE. 


SREAAAARAAAAAAAAAAAKAAAAAAASAAAATAAAAAAAARAAAAERAAAAAARAARAARARAAEAEEE 


- 
°@ 
°2 
-* 
022222 000004 iST14: SCOPE 
$: MOV 


177777 #-1,R0 sFILL RO WITH ALL ONES 
177574 ’ MOV SR sREAD SR1_ INTO R 
23 :BRANCH IF SRI ety ALL ZEROS 
104014 ;SR1 DID L ZEROS 


IGHTER SCOPE. LOOP 
;REPLACE ERROR CALL WITH 


72 
012737 177777 : #-1,SR3 PTRY TO WRITE ONES TO SR3 
000060 ee0.282 sONLY BITS <5:4> SHOULD BE ONES 


12 :DION'T READ BACK A *'60"° 
: :CLEARS SR 
172516 TST SR3 ;VERIFY THAT JT WAS CLEARED 


TST15 ;;BRANCH IF SR3 READ ALL ZEROS 
022270 104012 12 7SR3 DIDN'T READ ALL ZEROS 


peeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeKeKeeKReKeeAeeKAeeeKeReeKeee 


:#TEST 15 BIT TEST OF KERNEL & USER PAR'S 


He FOLLOWING TEST CHECKS THE BITS <15:00> OF BOTH THE KERNEL 
AND USER PAGE ADDRESS REGISTERS. A ‘‘0'' IS ROTATED THRU 
THE REGISTERS FROM LEFT TO RIGHT. 


SeRHeKeSTee EEE KAAEEAEK KEKE eeeeeeeeAeeetereReReeereees 


115: SCOPE 


. 
;* 
;* 
~ 
1 


022272 000004 
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1787 
1788 1$: #K1PARO,RO ;LOAD ADDRESS OF FIRST PAR IN RO 
1789 23: #10,R3 [SETUP R3 TO COUNT 

1790 001110 “4 #38. SLPERR [SET LOOP ON ERROR POINTER TO 3$ 
: (RO) »RI 


11 


333 


PAR INTO R1 
ZBRANCH IF PAR ap OK 
R WOULD NOT CLEAR 
FOR TIGHTER SCOPE LOOP 
; REPLACE ERROR CALL WITH 
R 3$" = 000774 


4$: #077777 ,,R4 ‘LOAD WALKING 0° TEST PATTERN IN R4 
001110 #5$,SLPERR ;SET LOOP ON ERROR POINTER TO Feta 
5$: (RO) CLEAR THE PAR BEFORE LOADING DAT 
R4, (RO) :B1T SET THE TEST PATTERN INTO THE PAR 
(RO) ,R2 sREAD THE PAR INTO R2 
R4 ,R2 ;DOES DATA WRITTEN=DATA READ? 
6$ BRANCH IF YES 
022346 R4,RI :SETUP FOR ERROR REPORTING 
022350 2 ;PAR BITS DID NOT SET CORRECTLY 
FOR TIGHTER SCOPE LOOP 
sREPLACE ERROR CALL WITH 
‘3B Brey 


Bee Sess sssseF 


022352 


000002 
R3,3$ TIL ALL PAR S TESTED 
177660 #UIPAR7+#2,RO SHAVE USER PAR’S BEEN TESTED 
7 :BRANCH IF YES 
177640 #UIPARO,RO LOAD FIRST USER PAR ADDR. IN RO 
000737 2$ ;BRANCH BACK TO TEST USER PAR'S 
022402 012737 022274 001110 7$: #1$,SLPERR ;RESET LOOP OR ERROR POINTER TO 18% 
LEAVE TEST WITH BITS <11:1>=1 IN ALL PAR'S 


Ge Go 09 69 68 OO 
et ed aed ed ed ed 
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,, eeeeererrererrrerrerereerererererreeeereneeaeeereneeaneseeeeeee 


s*TEST 16 BIT TEST OF KERNEL & USER PDR'S 
-@ 


THE FOLLOWING TEST CHECKS THE BITS <14:8> AND <3:1> OF BOTH THE 
KERNEL AND USER PAGE DESCRIPTOR REGISTERS. A ‘O*’ IS ROTATED 
THRU THE REGISTERS FROM LEFT TO RIGHT. SOME TEST PATTERNS WILL 
BE LOADED MORE THAN ONCE DUE TO THE UNUSED BITS IN THE PDR'S. 


022410 


922412 012700 172300 : #K1PDRO.RO [LOAD ADDRESS OF FIRST PDR IN RO 
000010 : #10,R [SETUP R3 TO COUNT 8 PDR'S 
022430 001110 #3$.SLPERR [SET LOOP ON ERROR POINTER TO 3$ 
3$: (ROS [CLEAR THE POR 
(RO) ,R1 [READ THE PDR INTO R1 
4$ [BRANCH IF POR CLEARED OK 
11 [PDR WOULD NOT CLEAR 
[FOR TIGHTER SCOPE LOOP 
[REPLACE ERROR CALL WITH 
:"BR 38" = 000776 
077777 4$: #077777,R4 [LOAD "WALKING "‘O'' TEST PATTERN IN R4 
022452 001110 #5$,SLPERR [SET LOOP ON ERROR POINTER TO 5$ 
_ 5$: (RO) [CLEAR THE PDR BEFORE LOADING DATA 
RG, RI ‘LOAD DATA INTO R1 
100361 #160361,R1 “MASK UNUSED BITS OUT OF THE DATA 
R1, (RO) [BIT SET THE TEST PATTERN INTO THE PDR 
(RO) ,R2 ‘READ THE PDR INTO R2 
R1,R2 [DOES DATA WRITTEN=DATA READ? 
6$ *BRANCH IF YES 
12 [PDR BITS DID NOT SET CORRECTLY 
: “FOR TIGHTER SCOPE LOOP 
[REPLACE ERROR CALL WITH 
:BR 5$" = 00076 


3 7 
022474 : 3SET THE C-BIT FOR THE ROTATE INST. 
4 : RG sROTATE THE TEST PATTERN IN R4 
5$ ;BRANCH BACK IF MORE BITS TO TEST 
000002 #2,R0 3;GET NEXT PDR ADDRESS IN RO 
R3,38 ;BRANCH BACK UNTIL ALL PDR'S TESTED 
177620 #UIPDR7+2,R0 ;HAVE USER PDR'S BEEN TESTED? 
7$ BRANCH IF YES 
177600 #UIPDRO,RO ;LOAD FIRST USER POR ADDR. IN RO 
;BRANCH BACK TO TEST USER POR'S 
022524 022412 001110 7$: #1$,SLPERR :RESET LOOP ON ERROR POINTER TO 1$ 
sry ee “i ALL WRITEABLE BITS IN 
3 ALL ‘S$ = 


METTIITILILI LILI iiiiitiiiiiiiiiiiiiiiiiiiiiiiiiill 


S#TEST 17 TEST FOR DUAL BYTE ADDRESsING OF KERNEL & USER PAR'S 
*@ 
; THE FOLLOWING TEST WRITES TO BOTH BYTES OF THE KERNEL & USER 


C2 O29 68 O89 C9 Cd Op 0D CD CD 
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022472 


ee ed et tt os ot 
4 2 Co Od Co CD OD CD CD CD 

BSeSSRTewe 
—O O@ne Wwf wnr— 


ge 
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PAR'S SEPERATELY TO SEE THAT WRITING TO ONE DOES NOT EFFECT 
THE OTHER, 
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022532 000004 15117: SCOPE 


ow 
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172340 1$: 
022552 001110 2%: 
000019 


29-JAN-79 15:10 PAGE 39 
TEST FOR DUAL BYTE ADDRESSING OF KERNEL & USER PAR'S SEQ 0059 
MOV #K1PARO,RO ;LOAD ADDRESS OF FIRST PAR INTO RO 
MOV #3%,SLPERR ;SET LOOP ON ERROR POINTER TO 5% 
MOV #10,R5 LOAD LOOP COUNTER TO DO 8 PAR'S 
MOV #-1,R1 [LOAD TEST PATTERN INTO R1 


CLR (RO) ;CLEAR THE PAR 


B 4 
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1883 RI (RO) sWRiTE 1°S TO THE LOW BYTE OF THE PAR 
1884 11002 MOV (RO) R [READ THE ENTIRE PAR INTO R 
1885 701 177400 so }cb6, RI ZMASK HIGH BYTE & UNUSED BITS OUT OF THE DATA 
1886 2 R1,R2 WAS ONLY THE LOW BYTE WRITTEN TO 

BEQ 43° <BRANC H IF YES 
022574 15 HIGH BYTE EFFECTED BY WRITING LOW BYTE IN PAR 
[FOR TIGHTER SCOPE LOOP 


L 
;REPLACE ERROR CALL WITH 
:"BR 38" 


766 
022576 022604 001110 48: #5$,SLPERR —«-:: SET LOOP ON ERROR POINTER TO 5$ 
5$: (RO) [CLEAR THE PAR 
177777 #-1,R1 [LOAD TEST, PATTERN INTO R1 
000001 R1,1(RO) ‘WRITE 1°S TO THE HIGH BYTE OF THE PAR 
(RO) ,R2 TREAD THE ENTIRE PAR INTO R2 
000377 #000377,R1 [MASK LOW BYTE 
R1,R2 [WAS ONLY THE HIGH BYTE WRITTEN 10? 
6$ ‘BRANCH IF YES 
15 [LOW BYTE EFFECTED BY WRITING HIGH BYTE IN PAR 
[FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
:"BR 5" = 00076 


000002 : #2,R0 ;PUT ADDRESS fl aa PAR IN RO 
R3,3$ BRANCH BACK L 8 PAR’ 4 TESTED 
177660 #UIPAR7+#2,R0 sHAVE USER PAR $. BEEN TESTED 
7 BRANCH IF YES 
177640 #UI1PARO,RO [LOAD ADDRESS OF FIRST USER PAR IN RO 
2$ sBRANCH BACK TO TEST USER PAR'S 
022654 012737 022534 001110 : #1$,S$LPERR ;RESET LOOP ON ERROR POINTER TO 1$ 
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001110 


001110 
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TEST FOR DUAL BYTE ADDRESSING OF KERNEL & USER PDR'S 


;eterereerererrrererrerererrrererereeereeeeeAAreReeKeReeeeeeeeret 


:eTEST 20 


4$: 
5$: 


6$: 


022664 001110 7$: 


TEST FOR DUAL BYTE ADDRESSING OF KERNEL & USER PDR'S 
THE FOLLOWING TEST WRITES TO BOTH BYTES OF THE KERNEL & USER 


PDR'S SEPERATELY TO SEE THAT WRITING TO ONE DOES NOT EFFECT 


THE OTHER. 
SCOPE 

MOV #KIPDRO,RO 
MOV #3$,SLPERR 
MOV #10.R3 

MOV #-1,R1 

CLR (RO) 

MOVB = R17, (RO) 
MOV RO) ,R2 
BIC #177761,R1 
CMP R1,R2 

BEQ 4$ 

ERROR 15 

MOV #5$,SLPERR 
CLR (RO) 

MOV #-1,R1 
MOVB = R1,, 1 (ROD 
MOV (RO) ,R2 
BIC #100377,R1 
CMP R1,R2 

BEQ 6$ 

ERROR 15 

ADD #2,R0 

SOB R3,3$ 

CMP #UIPDR7+2,R0 
BHIS 

HOV #UIPDRO,RO 
MOV #1$,SLPERR 


aT ADDRESS OF FIR 


ST PDR INTO RO 


SET LOOP ON ERROR POINTER TO 3$ 
;LOAD LOOP COUNTER TO DO 8 PDR'S 
+ LOAD TEST o— INTO R1 


GH 
WAS ONLY THE LOW BY 
‘BRANCH 


sFOR TIGHTER SC 


LOW Ady OF THE PDR 
& UNUSED BITS OUT OF DATA 


TE WRITTEN TO? 


H IF YES 
HIGH BYTE EFFECTED BY WRITING LOW BYTE IN POR 
OPE LOOP 


; REPLACE ERROR CALL WITH 
‘BR 38° = 000766 
SET LOOP ON ERROR POINTER TO 5$ 


CLEAR THE PDR 
:LOAD TEST PATTERN I 
WRITE 1°S TO THE HI 


NTO R1 
GH BYTE OF THE PDR 
INTO R2 


UNUSED BITS OUT OF DATA 


WAS ‘out THE HIGH BYTE WRITTEN TO? 


;BRANC 


F YES 
LOW BYTE EFFECTED rie me HIGH BYTE IN POR 


:FOR TIGHTER SCOPE L 


;REPLACE ERROR CALL ITH 
:"'BR 000765 


5$"" = 
;PUT ADDRESS OF NEXT 
BRANCH BACK UNTIL 
:BRAN USER 4% S BEE 


RANCH IF Y 
;LOAD ADDRESS OF 4. 


PDR IN RO 


8 POR'S TESTED 


N TESTED? 
ST USER PDR IN RO 
R PDR'S 


;BRANCH BACK TO TEST USE 


;RESET LOOP ON ERROR 


POINTER TO 1% 


SEQ 0041 
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s,ettereeerererererererererereerereerereeeeeAeeeAeeeeeAeKAeeeseeeee 


s*TEST 21 PAR-PDR DUAL ADDRESSING TEST 
THE FOLLOWING TEST SETS ALL OF THE WRITEABLE BITS TO 1, 
*S USING “SET 


OR R TIN E 
ADDRESS OF ANY REGISTER WHOSE BITS DID NOT REMAIN SET WHEN 
ANOTHER REGISTER WAS CLEARED. 


FRR RAAAAAAAAEAEAA KEE A ALAA EAA AAA AAA AAAAEAAAAAAATKAAAAEAARAEEE 


ig121: SCOPE 


001110 18: #2, SLPERR :SET LOOP ON ERROR POINTER 2$ 
#10.R [LOAD LOOP COUNTER WITH AN 8 
#K1PORO,RO [LOAD ADDRESS OF FIRST KERNEL PDR AND RO 
PC, SETREG :SET ALL BITS IN ALL PAR'S IN PDR'S 
2s: #KERSTK,KSP :SETUP STACK POINTER 
(RO) SCLEAR ONE OF THE KERNEL PDR'S 
PC , CHPREG SEE IF OTHER PAR/PDR'S WERE EFFECTED 
#-1, (RO)+ ; RESTORE ALL ONES, AND SETUP FOR NEXT PDR 
R3, $ P 10 os UNTIL ALL KERNEL | PDR'S CHECKED 
001110 #3$, SLPERR iter LOOP ON ERROR POINTER TO 3$ 
#10.R3 [LOAD LOOP COUNTER WITH AN § 
#KIPARO,RO [LOAD ADDRESS OF FIRST KERNEL PAR IN RO 
#KERSTK.KSP ?SETUP STACK POINTER 
(RO) [CLEAR ONE OF THE KERNEL PAR'S 
PC, CHPREG [SEE IF OTHER PAR/PDR’ S WERE EFFECTED 
#-1, (RO)+ RESTORE ALL ONES, AND SETUP FOR NEXT PAR 
R3, 3$ ; LOOP TO 3$ UNTIL ALL KERNEL PAR’S CHECKED 
001110 #4$,SLPERR *SET LOOP ON ERROR POINTER TO 4$ 
10, [LOAD LOOP COUNTER WITH AN 8 
#UIPDRO,RO ZLOAD ADDRESS OF FIRST USER PDR IN RO 
#KERSTK.KSP :SET up STACK POINTER 
(RO) [CLEAR ONE OF THE USER POR'S 
PC, CHPREG [SEE IF OTHER PAR/POR'S WERE EFFECTED 
#-1, (RO)+ SRESTORE ALL ONES, AND SETUP FOR NEXT UPDR 
R3,4$ ‘LOOP TO 4$ UNTIL ALL USER PDR'S CHECKED 
001110 #5$, S$LPERR ?SET LOOP ON ERROR POINTER TO 5$ 
#10, [LOAD LOOP COUNTER WITH AN 8 
#UIPARO,RO [LOAD ADDRESS OF FIRST MUSER PAR IN RO 
#KERSTK.KSP :SETUP STACK POINTER 


(RO :CLEAR ONE OF THE USER PAR'S 
PC,CMPREG SEE IF OTHER PAR/PDR'S WERE EFFECTED 
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at ot Oo — 

Wr & rrr 
OW" OQwaoow S 
axissSSssSSsSEas 


2 
7 
2 
2 
2 
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5 


$s 


3 
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ssausssss 


SSsssSsssess 
ovr mS ae a ae a at NY 
Wrrrrnnr 
NO NNN NEN NO NNN NS NO NNN NO SN 
SSSSesseo 
nO uUnoono 
o -o o- 
™~™ Nw ON 


ALA > 


023176 
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023202 012720 177777 MOV #-1, (RO) sRESTORE ALL ONES, AND SETUP FOR NEXT UPAR 
023206 SOB R358 LOOP TO 5$ UNTIL ALL USER PAR'S CHECKED 
023210 023014 001110 MOV #18, SLPERR ;SET LOOP ON ERROR POINTER TO 1$ 


FRRAAAAAE AAAS EAEHE AAA AASAAAAAAAAAAAAAAAAAAERAAAAAAAAAERAAAAAAAATE 


#TEST 22 TEST THAT PAR-PDR'S NOT AFFECTED BY RESET 
Ls A 2 CHECKS TO SEE THAT THE KERNEL OR USER PAR/PDR'S ARE 


UNCHANGED 


SREAHKEHAAATAAAAATAAAAAAAE TASKS AAAAAAAAAAAAAAARAEARATAAARAARE 


-f 
-f 
-¢ 
;* INE I 
: THE PAR/POR'S. THEN THEY ARE READ TO SEE THAT THEY REMAINED 
- 
- 
$122: SCOPE 


i 


023216 


;SET ALL BITS IN ALL PAR*S AND PDR'S 


023220 035166 1$: PC,SETREG 
000005 


023246 


023250 


023326 


023330 
0235 


Sesss 


RllSss 
UR a ot oe 


+ ah + 
S 
lb Sem kha ed 


orn 
woo 


ooo oo 
— 2 nao 


172300 
000010 


077416 


000002 


172340 
000010 


177777 


000002 


177600 
000010 


077416 


000002 


177640 
000010 


#K1PDRO,RO 

#10,R4 
(RO) ,R1 

arias, RI 


55 


#2,R0 
R428 
#KIPARO,RO 
#10,R4 
(RO) ,R1 
#177777,R1 
58 

55 


#2,R0 
R448 
#UIPDRO,RO 
#10,R4 
(RO) RI 
#77416,R1 
7$ 

55 


#2,R0 
R4 ,6$ 


#UILPARO,RO 
#10,R4 
(RO) ,R1 





TISSUE AN “INIT BY EXECUTING A RESET 
“LOAD ADDRESS OF FIRST KERNEL PDR IN RO 
“LOAD LOOP COUNTER WITH AN 8 
“READ A KERNEL POR INTO.RI 

ZARE ALL THE BITS STHig SET? : | 

BRANCH 1 Lat ay, BE aad «en 

SPE ANEL, POR varrecTep. Be RESET ees - 

“FOR TIGHTER SCOP ) 

;REPLACE ERROR CALL UIT « 

‘BR 28" = 000773 : 


: FORM ADDRESS OF NEXT KERNEL PDR 
TO 2$ UNTIL ALL KERNEL PDR'S CHECKED 

LOAD ADDRESS OF FIRST KERNEL PAR IN RO 
sLOAD LOOP COUNTER WITH AN 8 

;READ A KERNEL PAR INTO R1 

:ARE AL ALL i. BITS STILL SET? 
KERNEL PAR AFFECTED BY A RESET 
sFOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 

R 4$" = 000775 


FORM ADDRESS OF NEXT KERNEL 
LOOP TO 4$ UNTIL ALL KERNEL PAR’ S CHECKED 
LOAD ADDRESS OF FIRST USER POR IN RO 


; INTO R1 
ARE ALL THE BITS STILL SET? 
;BRANCH IF YES 
sUSER POR AFFECTED BY A RESET 
:FOR TIGHTER SCOPE LOOP 
: REPLACE ERROR CALL WITH 
R 6$" = 000775 
FORM ADDRESS OF NEXT USER POR 
LOOP TO 6$ UNTIL ALL USER PDR'S CHECKED 


;LOAD ADDRESS OF FIRST “— PAR IN RO 
;LOAD LOOP COUNTER WITH AN 8 
;READ A USER PAR INTO RI 
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2061 023350 022701 177777 CMP #177777,R1 sARE ALL THE BITS STILL SET? 
2062 023354 001401 BEQ 9$ sBRANCH IF YE 

2063 023356 104055 ERROR 55 ;USER PAR AFFECTED BY A RESET . 
2064 FOR TIGHTER SCOPE LOOP 

2065 REPLACE ERROR CALL WITH 

2066 :‘BR 8$"" = 000773 


2067 023360 53 te 000002 9$: ADD #2,R0 ;FORM ADDRESS OF NEXT USER PAR 
2068 023364 07741 SOB R4 8S ;LOOP TO 8$ UNTIL ALL USER PAR'S CHECKED 


2092 SLUM AAAA AAA AAA TAA AE KATEAAA RAE AAA AAAKeRAAAAeAARAeKeKAReLA Kee 


2093 s*TEST 23 RELOCATION & ADDER TEST (NO CARRIES) 


THE FOLLOWING Pe g UP THE KERNEL PAR’S AND PDR'S 
FOR THE REST OF THE PROGRAM. IT THEN USES DIFFERENT 
VIRTUAL ADDRESSES AND DIFFERENT VALUES FOR a, PAR 4 
TO PUT DIFFERENT PATTERNS AT THE INPUTS OF THE 

MEMORY MANAGEMENT ADDER. THE VALUES ARE SUCH 

THAT NO CARRIES ARE GENERATED OUT OF THE ADDER. 


-f 

a 

:f 

:* 

** 

:f 

** 

ff \ 

;* THE METHOD USED TO SEE THAT THE RIGHT PHYSICAL BUS ADDRESS 
;@ 1S FORMED BY THE ADDER 1S TO-WRITE A PATTERN TO VIRTUAL 

;@ LOCATION WITH MEMORY MGMT., AN 

;* THEN READ THAT LOCATION USING THE PHYSICAL ADDRESS T + a SHOULD 
;* HAVE BEEN FORMED TO SEE IF THE TEST PATTERN GOT THEIR 

;@ 22-B1T AND 18-BIT ADDRESSING ARE USED. 

S 


SREAAAATAEAASTARAAAAAAAAEA TAKARA AAAAAAEHARARAAAAARRAReeKeeee 


i 


TARUW=SSSLESRAVSS 


MROMQMEPENIMPINININPINM MNP UPN 
kk ek a kk ak kt at ts 


023366 000004 123: SCOPE 
023370 012700 172340 1$: MOV #KIPARO,RO sLOAD ADDRESS OF FIRST KERNEL PAR IN RO 
023374 005001 CLR R1 “CLEAR RI 

023376 012702 000007 MOV #7 ,R2 ‘LOAD LOOP COUNTER WITH A 7 

023402 010120 2$: MOV R1.(RO)+ “MAP KERNEL PAR'S TO PAGES 0-6 (4K EACH) 
23404 062701 000200 ADD #260,R1 

023410 077204 $08 R2,28 


;LOOP UNTIL KIPARO = KIPAR6 ARE LOADED 
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012710 007600 #7600, (RO) ; MAP KIPAR7 TO THE 1/0 PAGE 
012700 172300 SKIPDRO. RO LOAD ADDRESS OF FIRST KERNEL PDR IN RO 
077406 #77406, 81 ;LOAD POR DATA | cae +! 
000010 #10,R2 LOAD LOOP COUNTER H AN 8 
38: R1,(RO)* ;MAP a" : PAGES 128. BLOCKS. UPWARD 
R2,38 XPANDABLE, READ/WRITE 


023436 001110 4s: #4%, SLPERR :SET LOOP ON ERROR POINTER TO 4$ 
7776 - $67776,R0 : AL A INTO RO 
#107776,R1 IRTUAL ADDR. VBA 
#125250.R2 {LOAD TEST PATTERN INTO R2 
#600, Ro :LOAD R4 WITH PAR VALUE 
| PARG SLOAD KERNEL PAR 4 BITS <15:00> 
| | : SAVE CONTENTS At Tes! LOCATION 
177572 #21,SR0 ON MEM. MGNT. 22-BIT ADDRESSING 
MO LOAD 125050" USING ADDER (PAR4 * VIRT ADDR.) 


MEMORY MGMT. 
(RO) ,R3 READ 155250 BACK WITHOUT USING MEM. MGMT. 
001176 STMPO, (RO) RESTORE ORIGINAL CONTENTS TO TEST LOC. 
Ossie . nz R53 WAS SAME PATTERN READ BACK THAT WAS 
WRITTEN USING MEMORY MANAGEMENT? 
023516 05 5$ sBRANCH IF YES 
001306 R1,VIRT1I sSAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 
035452 PC, FORMPA ; NG 
17 :TEST LOCATION DID P 
;THAT SHOULD HAVE Bren WRITTEN TO IT. 
: APPARENTLY PHYSICAL ADDR. WAS 
;FORMED WRONG BY ADDERS USING 
THE VIRTUAL ADDR. AND KIPAR4 
:FOR TIGHTER SCOPE LOOP 
; REPLACE ERROR CALL WITH 
"BR 48" = 000742 


5$: 
025552 001110 6$: #6$, S$LPERR ;SET LOOP ON ERROR POINTER TO 6$ 
#67776,RO [LOAD PHYSICAL ADDR. PBA INTO RO 
[LOAD VIRTUAL ADDR. VBA INTO R1 
*R2 [LOAD TEST PATTERN INTO R2 
#052. Rs sLOAD R4 WITH PAR VALUE 
ARG SLOAD KERNEL PAR 4 BITS <15:00> 
MO ind) STRPO i SAVE CONTENTS, AT AT Test LOCATION 
000021 177572 #21,5R0 TUR . 22-BIT ADDRESSING 
m R2, (R1) amb 125e51 USING ADDER (PAR4 + VIRT ADDR.) 


URN OFF MGMT. 
; READ Par etn BACK WITHOUT USING MEM, ry 


iW TTERN READ BACK THAT W 
:WRITTEN USING MEMORY MANAGEMENT ? 
7$ sBRANCH IF YES 
001306 R1,VIRT1 SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 
035452 JSR PC,FORMPA :G0 FORM PHYSICAL ADDRESS FOR TYPING 
17 414 LOCATION DID NOT HAVE PATTERN 
T SHOULD HAVE BEEN WRITTEN TO IT. 
APPARENTLY PHYSICAL ADDR. WAS 
sFORMED WRONG BY ADDERS USING 
;THE VIRTUAL ADDR. AND KIPARG 
:FOR TIGHTER SCOPE LOOP 


im 
—— 
— 
~ 


ONO US Wh OO 


SOCCCCOCOSO oCCOoOO 


i ee ee ee a at ot = ott et ot 
WwnN—o 


™ 
* 


et et et et 
errs 
sco@onouw 


023532 


oooooo°o[oo 


S 


(RO) ,R3 
001176 $TMPO, (RO) 
R2,R3 


S 82°S 


é 
2 
2 
2 
2 
2 
2 
2 
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2 
2 
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2 
2 
2 
2 
2 
2 
2 
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2 
2 
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2 
2 
2 
2 
2 
r4 
2 
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ANNO OO AOAS MMMAMMAAMIMNY 





H 4 
MD-11-CJKDA-A F-11 MAU “h MACY11 30A(1052) 29-JAN-79 15:10 PAGE 46 
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2173 + REPLACE ERROR CALL WITH 
2174 "BR 68" = 000742 
2175 023626 7$: 
2176 023626 012737 023626 001110 8$: MOV #8$ ,SLPERR ;SET LOOP ON ERROR POINTER TO 8$ 
2177 023634 012700 067776 MOV 967776 ,RO ;LOAD PHYSICAL ADDR. PBA INTO RO 
2178 023640 012701 105276 MOV #105276,R1 ;LOA D VIRTUAL ADDR. VBA INTO RI 
2179 023644 012702 125252 MOV #125252 .,R2 LOAD TEST PATTERN INTO R2 
2180 023650 012704 000625 MOV yt R4 ;LOAD R4 WITH PAR VALUE 
2181 023654 010437 172350 MOV KIPARG ;LOAD KERNEL PAR 4 BITS Se 00> 
2182 023660 011037 001176 MOV rf a6), sSAVE CONTENTS AT TEST LOCATION 
2183 023664 052737 000021 177572 BIS SRO ; TURN ON MER. AGNT. 32-BIT ADDRESSING 
2184 023672 010211 MOV Roe RD LOAD 125252 USING ADDER (PAR4 + VIRT ADDR.) 
2185 023674 000005 RESET ; TURN OFF MEMORY MGAT. 
2186 023676 011003 MOV ;READ 125252 BACK WITHOUT USING MEM. MGMT. 
2187 023700 013710 001176 MOV $TRP6" RO) ;RESTORE ORIGINAL CONTENTS TO TEST LOC. 
2188 023704 020203 cmp R2,R5 sWAS SAME PATTERN READ BACK THAT WAS 
2189 sWRITTEN USING MEMORY MANAGEMENT? 
2190 023706 001405 BEQ 9$ sBRANCH IF YES 
2191 023710 010137 001306 MOV R1,VIRT1 :SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 
2192 023714 004737 035452 JSR PC,FORMPA 760 FORM PHYSICAL ADDRESS FOR TYPING 
2193 023720 104017 ERROR 17 :TEST LOCATION DID NOT HAVE PATTERN 
2194 : ; THAT SHOULD HAVE BEEN WRITTEN TO IT. 
2195 APPARENTLY PHYSICAL ADDR. WAS 
2196 FORMED WRONG BY ADDERS USING 
2197 ;THE VIRTUAL ADDR. AND KIPAR4 
2198 :FOR TIGHTER SCOPE LOOP 
2199 :REPL ACE ERROR CALL WITH 
2200 "BR 8$"' = 000742 
ss 023722 9$: 
2203 023722 012737 023722 001110 10%: MOV #10$,S$LPERR ;SET LOOP ON ERROR POINTER TO 108 
2204 023730 012700 177776 MOV #PSw,RO ;LOAD PHYS. ADDR. OF PSW INTO RO 
2205 023734 012701 100076 MOV #100076. Ri ;LOAD VIRTUAL ADDR. FOR PSW INTO RI 
2206 0235740 012702 030340 MOV eo eeetor R2 LOAD DATA FOR PSU ay N R2 
2207 023744 012704 007777 MOV #7777,R LOAD R4& WITH PAR VALUE 
2208 023750 010437 172350 MOV R4, KIPARG ;LOAD KERNEL PAR 4 ‘BITS <11:00> 

209 025754 005010 CLR (RO) sCLEAR THE PSW Ls 

2210 023756 052737 000001 177572 BIS #8110, SRO TURN ON "MEMORY MANAGEMENT’ (18 on ~ 9 yeeoens 
2211 023764 010211 MOV R2,(R1) LOAD PSW USING ADDER (PAR4 + VIRT ADDR 
2212 023766 000005 RESET ; TURN OFF MGMT (SRO=0) 
2213 023770 011003 MOV (RO) ,R3 READ PS BACK WITHOUT USING MEM. MGMT. 
2214 023772 005010 CLR (RO) ;CLEAR THE PSW 
2215 023774 042703 000037 BIC #37,R5 MASK T-BIT & CC BITS OUT OF DATA READ 
2216 024000 020203 CMP R2,R5 sWAS PSW WRITTEN? 
2217 024002 001405 BEQ 11$ sBRANCH IF YES 
2218 024004 010137 001306 MOV R1,VIRT1 ;SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 
2219 024010 004737 035452 JSR PC ,FORMPA GO FORM PHYSICAL ADDR. FOR TYPING 
2220 024014 104017 ERROR 17 :PSw DID NOT HAVE DATA THAT IT SHOULD HAVE, 
2221 APPARENTLY PHYS. ADDR. OF PSw WAS 
2222 NOT FORMED BY ADDERS USING THES 
2225 VIRTUAL ADDR. AND KIPAR4 
2224 ;FOR TIGHTER $ LOO 
2225 sREPLACE ERROR CALL WITH 
2226 "BR 10$°' = 00074 
2227 024016 012737 024016 001110 118: MOV #11$,SLPERR ;SET LOOP ON ERROR POINTER TO 11% 
2228 024024 012700 177776 MOV #PSW,RO ;LOAD PHYS. ADDR. OF PSW INTO RO 
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117776 ANCE ty ;LOAD VIRTUAL LT Bis INTO R1 


3 3 


177572 TURN 
R2,(R1) :LOAD Psu USING "ADDER (PAR4 + VIRT. ADDR. 
sTURN OFF MEM. GAT (SRO=0) 
(RO) .R3 sREAD PSU ~~ WITHOUT USING MEM. AGAT. 
(RO) :CLEAR THE P 
000037 #37 R35 sMASK T-BIT i ce * as OUT OF DATA READ 
R2,R3 WAS PSW WRIT 
128 sBRANCH IF ES 
001306 R1,VIRTI sSAVE VIRTUAL ADDR. TO FORM PHYSICAL ADDR. 
035452 JSR . PC, FORMPA :G0 FORM PHYSICAL ADDR. FOR TYPING 
; 17 3PSW DID NOT HAVE DATA THAT IT SHOULD 
HAVE, APPARENTLY PHYS. ADDR. OF PSW WAS 
. :NOT FORMED BY ADDERS USING THE 
‘ VIRTUAL ADDR. AND KIPAR4 
. FOR TIGHTER SCOPE LOOP 
: REPLACE ERROR CALL WITH 
7‘BR 118°" = 000745 
024110 023370 001110 12$: MOV #1$,SLPERR ;RESET LOOP ON ERROR POINTER TO 1$ 


SRAM REE EAA A TEAK AAA AA TATA TEA AAAAAAAAAAAAAAAAAAAARAAAAAAEAATAES 


s*TEST 24 RELOCATION & ADDER TEST (WITH CARRIES) 


52 
:# THE FOLLOWING TEST USES THE SAME METHOD AS THE PREVIOUS 
;* TEST TO VERIFY MEMORY MANA U 

;* PHYSICAL BUS ADDRESSES USING A VIR 

;* CONTENTS OF A PAGE ADDRESS REGISTER. HOWE 

;@ AND PATTERNS USED IN THIS TEST WILL — CARRIES 

** 

-* 

-« 

§ 


Mmrrrrnrnrrren 
SSSGEAFEULKLS 


AND CHECK ‘WRAPAROUND'’ TO ADDRESS 000000 
USING VIRTUAL ADDR. 111400 AND KIPAR4 = 177664. 
22-BIT ADDRESSING IS USED. 


REAR EAASAAAAAATAATAAAAAAAAAAAAAAAARAAAARAAAAAAARARAAAAAAAEES 


024116 124: SCOPE 


024120 1$: sKERNEL PAR'S AND PDR'S HAVE BEEN 
SETUP BY THE PREVIOUS TEST 
024120 sath v4 001110 2%: #2$,SLPERR SET LOOP ON ERROR POINTER TO 2$ 
MO #66476,R0 LOAD PHYSICAL ADDR. PBA INTO RO 
Atte G4 sLOAD VIRTUAL ADDR. VBA INTO R1 
#125253,R2 sLOAD TEST yt a INTO R2 
typt toa ;LOAD R4 WITH PAR VALUE 
ARG ; LOAD KERNEL PAR 4 BITS <15:00> 
(RO) ,ST APO — gl agg AT 7°33 LOCATION 
000021 177572 #21,SR0 - 22-B1T ADDRESSING 
a R2,(R1) ‘LOAD 125053. USING” ADDER (PAR4 + VIRT ADDR.) 


; TURN OFF MEMORY MGAT. 
(RO) ,R3 ; READ 15258 BACK WITHOUT USING MEM, MGMT. 
001176 $THPO, (RO) i RESTORE ORIGINAL CONTENTS 5 ba Loc. 
R2,R35 WAS SAME OPATTERN READ BACK T WAS 
TWRITTEN USING MEMORY MANAG GERENT 
;BRANCH IF YES 
IRT1 ;SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 
ORMPA :G0 FORM PHYSICAL ADDRESS FOR TYPING 


i 


3$ 
R1,V 
PC,F 
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2285 024212 104017 ERROR 17 sTEST LOCATION DID NOT HAVE PATTERN 
2286 ‘THAT SHOULD HAVE BEEN WRITTEN TO IT. 
2287 APPARENTLY PHYSICAL ADDR. WAS 

2288 [FORMED WRONG BY ADDERS USING 

2289 [THE VIRTUAL ADDR. AND KIPAR 

2290 [FOR TIGHTER SCOPE LOOP 

2291 ZREPLACE ERROR CALL WITH 

2292 :"BR 2$°° = 000742 

2293 024214 3$: 

229% 024214 012737 024214 001110 4s: MOV #46$,SLPERR :SET LOOP ON ERROR POINTER TO 4$ 

2295 024222 012700 062276 MOV #62276,R0 [LOAD PHYSICAL ADDR. PBA INTO RO 

2296 024226 012701 107376 MOV #107376,R1 [LOAD VIRTUAL ADDR. VBA INTO R1 

2297 024232 012702 125254 MOV #125254.R2 [LOAD TEST PATTERN INTO R2 

2298 024236 012704 000527 MOV W527. Re LOAD R4 WITH PAR VALUE 

2299 0242462 010437 172350 MOV ARS SLOAD KERNEL PAR & BITS <15:00> 

2300 024246 011037 001176 MOV (RO) STRPO : SAVE CONTENTS AT AT Tes! LOCATION 

2301 024252 052737 000021 177572 BIS #21, SRO STURN ON MEM. . 22-B1T ADDRESSING 
2302 024260 010211 MOV R2,(R1) sTOAD 125254 USING “ADDER (PAR4 * VIRT ADDR.) 
2303 024262 000005 RESET [TURN OFF MEMORY MGMT. 

2304 024264 011003 MOV (RO) -R3 :READ 125254 BACK WITHOUT USING MEM. MGMT. 
2305 024266 013710 001176 MOV STMPO, (RO) STORE ORIGINAL CONTENTS 10 TEST Loc. 
2306 024272 020203 CMP R2,R3 uAS SAME PATTERN READ BACK T T was 
2307 [WRITTEN USING MEMORY HANAGERENT? 

2308 024274 001405 BEQ 5$ BRANCH IF YES 

2309 024276 010137 001306 MOV R1,VIRT1 [SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 
2310 024302 004737 035452 JSR PC -FORMPA [GO FORM PHYSICAL ADDRESS FOR TYPING 
2311 024306 104017 ERROR 17 :TEST LOCATION DID NOT HAVE PATTERN 
2312 STHAT SHOULD HAVE BEEN WRITTEN TO IT. 
2313 [APPARENTLY PHYSICAL ADDR. WAS 

2314 [FORMED WRONG BY ADDERS USING 

2315 [THE VIRTUAL ADDR. AND KIPAR4G 

2316 [FOR TIGHTER SCOPE LOOP 

2317 ; REPLACE ERROR CALL WITH 

2318 :"BR 4$" = 000742 

2319 024310 5$: 
2320 024310 012737 024310 001110 6$: MOV #6 SLPERR ;SET LOOP ON ERROR POINTER TO 6$ 

2321 024316 012700 062076 MOV #62076 [LOAD PHYSICAL ADDR. PBA INTO RO 

2322 024322 012701 104576 MOV WOES Te. B SLOAD VIRTUAL ADDR. VBA INTO R1 

2323 024326 012702 125255 MOV #125255.R2 SLOAD TEST PATTERN INTO R2 

2324 024332 012704 553 MOV #955, R4’;LOAD R4°WITH PAR VALUE 

2325 024336 010637 172350 MOV KIPARG LOAD KERNEL PAR 4 BITS <15:00> 

2326 024342 011037 001176 MOV tro) STMPO *SAVE CONTENTS AT TEST LOCATION 

2327 0243466 052737 000021 177572 BIS #21, SRO STURN ON ER. MGNT. 32-BIT ADDRESSING 
2328 024354 010211 MOV R2,(R1) ;LOAD 125255 USING | ADDER (PAR4 + VIRT ADDR.) 
2329 024356 000005 RESET OFF MEMORY MGMT. 

2330 024360 011003 MOV READ 125255 BACK WITHOUT USING MEM. MGMT. 
2331 024362 013710 001176 MOV {repb  tROD :REST ORE IGINAL CONTENTS 10 TEST LOC. 
2332 366 020203 CMP R2,R3 S SAME OPAet ERN READ BACK THAT WAS 
2333 cURiTTEN USING MEMORY MANAGERENT? 

3354 024370 001405 BEQ 7$ BRANCH IF YES 

335 024372 010137 001306 MOV R1,VIRT1 ?SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 
2336 024376 004737 035452 JSR PC -FORMPA GO FORM PHYSICAL ADDRESS FOR TYPING 
2337 024402 104017 ERROR 17 iTEST LOCATION DID NOT HAVE PATTERN 
2338 ‘THAT SHOULD HAVE BEEN WRITTEN TO IT. 
2339 [APPARENTLY PHYSICAL ADDR. WAS 

2340 [FORMED WRONG BY ADDERS USING 
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THE VIRTUAL ADDR. AND KIPAR4 
sFOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
:'BR 68°" = 000742 


7$: 

024404 001110 8$: Tt 3 SLPERR :SET LOOP ON ERROR POINTER TO 8$ 
000000 # [LOAD PHYSICAL ADDR. PBA INTO RO 

#111406" R1 [LOAD VIRTUAL ADDR. VBA INTO R1 

#125256. *R2 [LOAD TEST PATTERN INTO R2 

9177664 RG ;LOAD RG WITH P. AR VALUE 
4 KIPARG [LOAD KERNEL PAR 4 BIT <15: 00> 
MOV (RO) , STMPO [SAVE CONTENTS AT 1st Loc ATION 

000021 177572 #21,5R0 STURN ON MEM. MGNT. 22-BIT ADDRESSING 

R2, (R1) LOAD 125256 USING ADDER (PAR4 * VIRT ADDR.) 


3; TURN MEMORY AGAT. 
MO (RO) ,R3 ;READ ie ta BACK WITHOUT USING MEM. MGMT. 
001176 STMPO, (RO) sRESTORE ORIGINAL CONTENTS TO Ls Loc. 
R2,R5 ;WAS SARE OPATIERN READ BACK THAT WAS 
WRITTEN USING MEMORY MANAGEMENT? 
9$ BRANCH IF YES 
001306 R1,VIRT1 sSAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 
004 035452 J PC,FORMPA G0 FORA PHYSICAL ADDRESS FOR TYPING 
024476 104017 17 : TEST ity DID NOT HAVE PATTERN 
;THAT SHOULD HAVE BEEN WRITTEN TO IT. 
APPARENTLY PHYSICAL ADDR. WAS 
: FORMED — BY ADDERS USING 
E VIRTUAL ADDR. AND KIPA 
FOR TIGH TER SCOPE LOOP 
;REPL ACE ERROR CALL WITH 
"BR 8$"' = 000742 
024500 


9$: 
024500 012737 024120 001110 MOV #1$,S$LPERR ;RESET LOOP ON ERROR POINTER TO 1$ 


PP AAAAAAAT AA AAAAAAAAAAAAAAEA AAA AAR AAARERAAARARAAAAAAKAAAAAAAAS 


s*TEST 25 READ AND WRITE WHILE IN RELOCATE MODE 


THE FOLLOWING TEST TURNS ON MEMORY MANAGEMENT AND THEN 
READS AND WRITES LOCATIONS BETWEEN PHYSICAL ADDRESSES 
060000-067600. ONE LOCATION IN EVERY BLOCK (32. WORDS) 

1S WRITTEN USING PAR4 AND READ USING PARS. THIS 1S 

DONE IN BOTH USER AND KERNEL MODES. THE USER PAR/PDR'S 

ARE SETUP AT THE BEGINNING OF THE TEST AND ONCE MEMORY 
MANAGEMENT IS TURNED ON IT JS LEFT ON FOR THE REST OF THE 
OF THE PROGRAM. THE ‘MODE’ INPUT TO THE PAR/PDR ADDRESS Mux 
1S CHECKED BY READING AND WRITING IN “t MODE. 7 ee 
ALSO, i a SINCE MEMORY MANAGEMENT IS ON (IN RELOCATE 
MODE) THE PROGRAM ITSELF 1S USING ITS VIRTUAL ADDRESSES AND 
THE PAR/PDR'S TO EXECUTE. 


WHILE TESTING IN KERNEL MODE, USER PAGES 4 & 5 ARE MAPPED 
NONRESIDENT WITH DIFFERENT PAR VALUES THAN THE KERNEL 
PAR'S TO BE SURE THAT THE KERNEL PAR'S AND PDR'S ARE BEING 
usee WHEN IN an MODE (AND VICE VERSA WHILE TESTING IN 
USER MODE). IF A MEM. MGMT. TRAP OCCURS, THE PROGRAM GOES 
TO 9% WHERE THE TRAP 1S REPORTED. 
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READ AND WRITE WHILE IN RELOCATE MODE 


BY SETTING THE LOCATION SMADR1 IN THE E-TABLE TO A CONSTANT, 
AS DESCRIBED IN THE DOCUMENTATION, THIS TEST WILL CONTINUE 
or Bana Am ys eng THROUGHOUT MEMORY BY INCREASING THE VALUE 


OF PAR 


SST AEKSAAAAAAAKAAAAAA AAA AAAALAAAAAAAAARAARAAAAARARATAEARAAAAARAEAAE 


SCOPE 
177776 
77 


solscsccscsss 
OV SV SEUSS 


VNNNNONMNMNMrNnNrn 
“th “ 
So 


07 
01 
01 
01 
01 
01 
07 
01 
01 
01 

0 


001176 


SSS 
esieies 


mrmu 
onNN—WwNO— 


00100 
120000 


— 
ss 


1 

10 
01 
01 
01 
01 
01 
01 
01 
02 


S 


001310 
001306 
035452 


— 

~~ pee: 
FRoo= 
ono 


001306 


127700 
140000 


177650 
177652 


177776 


R5 ,KIPARS 
+ tah nan RO 


46 tho. 
a2 260, RI 


2$ 
#479600, (RO) 
#UIPDRO, RO 
#77406,R 
#10,R 
Ri, (noe 


R2, 38 
#5$,$LPERR 
#9% ,MMVEC 


UIPDR4 
UIPORS 
R5 ,.UIPAR4 
R4 UIPARS 


;START IN KERNEL MODE 

[LOAD R4 WITH VALUE FOR PARG 

sLOAD RS WITH VALUE FOR PARS 

sLOAD KERNEL PAR4 

sLOAD KERNEL PARS 

;LOAD ADDRESS OF FIRST USER PAR IN RO 
sCLEAR RI 


LOAD LOOP COUNT ER WITH A 7 
sMAP USER PAR'S TO PAGES 0-6 (4K EACH) 


;LOOP UNTIL UIPARO-UIPAR6 ARE LOADED 

;MAP USER PAR7 TO THE 1/0 PAGE 

LOAD ADDRESS OF FIRST USER PDR IN RO 

;LOAD +m DATA aun 4H 

:LOAD L COUNTER H AN 8 

; MAP ALL at! PAGES 128. gLocKs. UPWARD 
EXPAND /WRITE 


TO 9$ 
; TURN ON MEMORY MANAGE Bk ph ADDRESSING) 
;MAP USER SPACE NON-RESIDENT WHILE 
TESTING KERNEL SPACE 
:MAP USER PAR’S OPPOSITE OF KIPAR'S 


sSAVE PSW IN CASE OF ERROR 
;PUT VIRTUAL ADDR. THAT USER PAR4 IN RO 
;PUT VIRTUAL ADDR. THAT git pees IN RI 
WRITE TO TEST LOC. USING P 
sREAD THE SAME LOC., BUT USING PARS 
;D1D WE READ WHAT WE WROTE? 
:BRANCH IF YES 
SAVE VIRTUAL ADDR. THAT SELECTED PARS 
:SAVE VIRTUAL ADDR. THAT SELECTED PAR4 
:GO FORM PHYSICAL ADDRESS BEING USED 
sREADING LOC. USING PARS AND A VIRT. 
;ADDR. DID NOT FIND DATA URITIEN WHEN USING 
;PAR4 AND VIRT. ADDRESS. 
FOR TIGHTER SCOPE LOOP 
; REPLACE ERROR CALL WITH 
:‘'BR 5$°" = 000765 
; RESTORE VBA IN RO 
;CHANGE VIRTUAL ADDRS. TO POINT TO NEXT BLOCK 


s WERE : a FROM 60000-676000 ALL TRIED? 


ANC 
HAVE WE DONE TEST IN USER MODE YET? 
;BRANCH IF YES 
;LOAD USER PAR4 
;LOAD USER PARS 
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002150 
024510 
001266 
001270 


001306 


160000 


001270 
001266 
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T25 


177610 
177612 


177776 


000250 
001110 


(VBA'S = 177 


#6 ,UIPDR4 
#6 ,UIPORS 
KIPDR4 
KIPORS 
R5 .KIPAR4 


R4 ,KIPARS 
? esectaiha 


PSwW 
RS ,@#SMADRI 
8$ 


#77406 ,KIPORS 
#77406 KIPDRS 
00,85 


#6 
R5 .KIPAR4 


4 SLPERR 


$126 


(KSP)+, TRAPPC 
(KSP)4*, TRAPPS 


RO,VIRTI 
PC .FORMPA 

SRO, WASSRO 
SR2.WASSR2 
#166000, SRO 


TRAPPS ,~(KSP) 
TRAPPC ,-(KSP) 


A 4 
29-JAN-79 15:10 PAGE 51 
READ AND WRITE WHILE IN 


RELOCATE MODE 

sMAP USER SPACE R/W TO TEST IT 

; RAP KERNEL SPACE NON-RESIDENT WHILE 
TESTING USER SPA 

{MAP KERNEL PAR'S OPPOSITE UIPAR'S 


:G0 TO USER MODE 
GO BACK AND READ/WRITE IN USER MODE 
:GO BACK TO KERNEL MODE BEFORE LEAVING 


HAVE WE CHECKED ALL MEMORY? 
;BRANCH IF YES 

LOAD WITH NEXT VALUE FOR PAR4 
;LOAD WITH NEXT VALUE FOR PARS 
LOAD KERNAL PAR4 

;LOAD KERNAL PARS 

;MAP KERNAL SPACE R/W WHILE TESTING 


;CONTINUE TEST 
;REMAP KERNEL PAGES READ/WRITE 


;MAP KERNEL AND USER PAR'S 4 & 5 
; BACK TO 12-16K 


: RESTORE ADDR. OF NORMAL M.M. TRAP ROUTINE 
RESET LOOP ON oe POINTER TO 18% 
$360 TO NEXT TEST 


;SAVE PC & PS OF TRAP 


;PROGRAM WILL TRAP TO HERE IF TRY 

;TO USE USER PDR'S WHEN IN KERNEL MODE 
;OR KERNEL PDOR'S WHEN IN USER MODE 

:SAVE VIRTUAL ADDRESS FOR ERROR REPORT 
;GO FORM THE PHYSICAL ADDRESS BEING USED 
sSAVE SRO & SR2 FOR ERROR REPORT 


: CLEAR ERROR BITS IN SRO 
WHILE IN RELOCATE MODE - 
: REFERENCED WRONG SET OF PDR'S 
sFOR TIGHTER SCOPE LOOP 
: REPLACE ERROR CALL WITH 


;A “'NOP’' = 000240 
;PuT PC & PS OF TRAP ON STACK 


;RETURN TO TEST 


pp etererererererrecerrerereteerererereeeseearaneeeeeeAAeeeeeReeee 


W-BIT LOGIC TEST, KERNEL PDR'S 


THIS TEST ye Tes TO EIGHT (8) DIFFERENT VIRT a DDRESSE 
6,37776,57776,77776,117776,137776,157776, i 177776 


SEQ 0051 
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. § tes efit = fds F Tate ti 77776,77776, 
77776,7777 re. RE Fre 

WHICH SHOULD CAUS BIT 16. Sé1 IN EACH OF THE 

EIGHT (8) KERNEL PAGE DESCRIPTOR REGISTERS. THE POR'S 

ARE CHECKED TO SEE THAT I1°S W-BIT DOES SET WHEN THE 

PAGE 11 IS MAPPED TO 1S WRITTEN TO AND THAT THE W817 

DOES NOT SET IN ANY OF THE OTHER PDR'S. KERNEL POR'S 3,4,5.6 
ARE MAPPED TO 12-16K FOR THIS TEST. ALSO THE W-B1T 

SHOULD BE CLEARED WHEN THE PDR JS WRITTEN TO. THE 

W-BIT PORTION OF THE POR'S IS BEING CHECKED. 


$126: SCOPE 
035100 PC, TOFF ; TURN T-BIT TRAPPING he FOR THIS TEST 
000004 #4 R2 SET LOOP TER 10 4 
172346 #K iPAR3,RO ;LOAD ADDRESS OF PARS INTO RO 
000600 + pe ft sLOAD *"12-16K"" P. 7 “ten INTO RI 
+ . 


~ 


. ee Be Ge ee — 
ees ‘eoaoeeeeeeee 


025224 


URUN“SSenorrunc-os > 
— ss . 


no 


egy gee Nae bet eet he > te 


SIF SFAL=SES 


2 
é 
2 
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PUPP PPP PPP PPP LP LPP LIP LDL LL LLLP LL LLIN 


we 


025524 


025326 
0253 


Sooooooooocoocooeo 
SWF YANO -ONnNn~s 


oS 
RS 
—NNWNO—tw 


172300 
000010 


000100 


000010 
172300 
000100 


R2.2% 
#KIPDRO,RS 
#10,R4 
#17776,R3 
@3$,SLPERR 
#K 1PDRO,RO 
#10,R2 
#77406,R1 
R1,(R0)¢ 
re 


R 
(RS), (R3) 
(R5) , #811 


5 
21 


8$ 

#10,R2 
#K1PDRO,RO 
100) SUBS? 


;LOOP TIL ALL LOADED 
:LOAD ADDRESS OF FIRS! PDR TO BE TESTED IN RS 


SE 8 
INITIALIZE. VIRTUAL ADDRESS TOBE IN R3 
:SET LOOP ON ERROR POINTER 10 38 
ZLOAD ADDR. OF FIRST PDR TO BE SETUP IN RO 
:SET LOOP COUNTER TO, 8 

"W-BIT OFF DATA’ INTO RI 
SCLEAR ALL W-B1TS BY WRITING TO ALL PDRS 
SLOOP UNTIL ALL OF THEM SETUP 
{DO "DATO" TO-VIRTUAL ADDR.-SETTING A W-BIT 
:D1D THAT CAUSE W-BIT TO BE SET? 
:BRANCH IF YES 
:W°BIT DID NOT GET SET IN PDR 
ZFOR TIGHTER SCOPE LOOP 
:REP PLACE ERROR CALL WITH 


‘SeIP CHECKING OTHER PDR'S-ERROR WILL SET W-BITS 
;SET LOOP COUNTER 10 8 
LOAD ADDR. OF FIRST PDR TO BE CHECKED IN RO 
:D1D aa IN OTHER PDRS REMAIN CLEAR? 


YES 
R5,RO :1F W-BIT SET, THEN WAS IT PDR UNDER TEST? 
1401 E 7$ :BRANCH IF YES 
025352 | W-BIT GOT 1 IN MORE THAN ONE PDR 
‘FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

: BR = 000750 
000002 ‘point “a0. TO NEXT PDR TO BE CHECKED 


R1. (RS) 
000100 1 (RS), #WBIT 


8$ 
23 


025354 
025360 
025362 
025364 
025370 
025372 


POMPE HsMsMIPINMIfINohs 
PAAAAMAAAAAAW 
pe ey eo 
—_ Seon Vk wt— 
+ +p tt 
oowj~ 


SCOP EL 
sREPLACE E ERROR CALL MnTH 
:POINT RS TO THE NEXT PDR TO BE TESTED 


mr 
ww 
oo 
Wr 


025374 000002 
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025400 062703 020000 ADD #20000 ,R3 sCHANGE VIRT. ADDR TO REF. NEXT PDR 

025404 077445 R4, 38 LOOP BACK TO 3$ UNTIL ALL 8 PDR'S TESTED 
025406 012737 025226 001110 P sRES RROR POINTER TO 1$ 
025414 004737 035134 PC, TON TURN T-BIT BACK ON FOR NEXT TEST 


FRRAAHAHAARAEKAA AAAS KATATE KAAAAK AEA AAAKAAAERAKARAAAKKAAKAKAAKees 


:#TEST 27 W-BIT LOGIC TEST, USER PDR'S 


THIS TEST WRITES TO EIGHT (8) DIFF 
yo = 17776,37776,57776,77776,1 

& PBA'S CONSTRUCTED = 17776,37776, 
77776,77776, & sige RESPECTIVELY 
WHICH SHOULD CAUSE THE "W-BIT’’ TO I 
EIGHT (8) USER PAGE DESCRIPTOR REGISTER 
ARE CHECKED TO SEE THAT IT'S W-BIT DOES 
PAGE is IS ~~ k - 1S WRITTEN TO AND THAT THE W-BIT 

OES ET o- he 3.4.5.6 


NT VIRTUAL ADDRESSES 
76,137776 137776. & 177776 
76.77776, O67 


E 
1 
; N EACH OF THE 


RE 
77 
77 
ET 
ST 
Dd 


W-BIT PORTION OF THE POR'S 1S BEING CHECKED. 


- eeeenenerreeeererereeererereeereeeeeeeeneeeteeteeeereeeeeeeeees 


18127: 
#140000,PSw :G0 TO USER MODE FOR THIS TEST 
PC, TOFF ; TURN T-BIT TRAPPING OFF FOR THIS TEST 
#4 ,R2 SET LOOP COUNTER TO 4 
#UIPARS RO LOAD ADDRESS OF PAR3 INTO RO 
#600,R1 sLOAD *"12-16K"" PAR rn INTO R1 
R1,(RO)4 sMAP PARS 3-6 TO 12-16 
R2,28 LOOP TIL ALL 4 OF THER LOADED 
#uIPDRO, oR5 TL ADDRESS eaten PDR TO BE TESTED IN R5 


SET LOOP COUNTER TO 
+ INITIALIZE VIRTUAL Stor TO - IN R3 
LOOP ON ERROR POINTER T 
#U1PDRO,RO : LOAD ADDR. OF FIRST PDR TO BE SETUP IN RO 
T LOOP COUNT 


#10,R2 
077406 #77406 ,R1 ;PUT hy-BIT OFF DATA’ INTO R1 
R1,(RO)+ ;CLEAR ALL W-BITS BY ee TO ALL PORS 
R2,4$ ;LOOP UNTIL ALL OF THEM SETU 
(RS), (R3) D0 DATO’ TO VIRTUAL ADDR. USETTING A W-BIT 
000100 (R5) ,#WBIT :D1D THAT CAUSE W-BIT TO BE SET? 
5$ sBRANCH IF YES 
21 :W-BIT DID NOT GET SET IN POR 
sFOR TIGHTER SCOPE LOOP 
: REPLACE ERROR CALL WITH 
;"'BR = 000 


8$ tSkIP CHECKING OTHER PDR'S-ERROR WILL SET W-BITS 
000010 T LOOP COUNTER TO 8 


: #10,R2 
177600 #UIPDRO,RO LOAD ADDR. OF FIRST PDR TO BE -2CKED IN RO 
000100 : (RO) ,#WBIT 3010 W-BIT IN OTHER PDRS REMAIN CLEAR? 
7$ ;BRANCH IF YES 
R5,R0 s1F W-BIT SET, THEN WAS IT PDR UNDER TEST? 
BEQ 7$ :BRANCH IF YES 
104022 22 :W=B1T GOT SET IN MORE THAN ONE PDR 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 3$" = 000750 


025420 


CU eeeeeneeee eee. 


eb aoe Se Se Se Se Ge Se Ge Se Ss Se Se Se Be Se 


oo 
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140000 177776 
035100 


s 
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01 
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sPOINT RO TO NEXT PDR TO BE CHECKED 
°6$ [LOOP UNTIL ALL 8 CHECKED FOR CLEAR W-BIT 

R1. (RS) [WRITE 10 THE POR TESTED TO CLEAR W-BIT 
000100 (5), #wB1T 


0 E 
025574 23 


[01D WRITING PDR CLEAR THE W-BIT? 
SBRANCH IF YES 

‘W-BIT DID NOT CLEAR BY WRITING THE POR 
[FOR TIGHTER SCOPE LOOP 

ZREPLACE ERROR CALL WITH 

:"BR 38" = 000740 
#2,R5 {POINT RS TO THE NEXT PDR 10. BE TESTED 
020000 #26000 ,R3 [CHANGE VIRT. ADDR TO REF. NEXT POR 

: ; LOOP BACK TO 3$ UNTIL ALL y POR'S TESTED 

025422 001110 #1$,S$LPERR OR TO 1$ 


ESET LOOP 
004737 035134 PC, TON 37 BACK ON FOR NEX iT TEST 
025622 005037 177776 PSw sBACK TO KERNEL MODE BEFORE LEAVING 


FRRARAAAAA AAAS AAA AAA KAT AAA AA AAAAAATAAAARAAAAAARERARAARAAAAATAEET 


eTEST 30 TEST "W-BIT'’ SPECIAL CASES 


;* 
ie THIS TEST CHECKS TWO SPECIAL CASES OF THE W-BIT. FIRST CASE IS 
;* THAT THE W-B1T SHOULD NOT SET IN PDR 7 WHEN WRITING TO 

;@ STATUS REG SRO (KERNEL POR 7 IS USED). eae - 1S THAT 

;@ THE W-BIT IS STILL SET IF THE ‘DATO’’ IS ABORTED DUE TO A 
°* 

°* 

iS 


025576 000002 
2 7 


TIMEOUT ERROR (KERNEL PDR6 & VIRTUAL ADDR 740000 ARE USED). 


SRERAAEAEEEAAAEAAAATEAAAAAAAAAAAATAAAAAAAAAAAARAARAARARAARAAAAAAAEAEE 


025626 SCOPE 


035100 1$: PC, TOFF ;TURN OFF T-BIT TRAPPING FOR THIS TEST 
#77406,R1 :PUT "W-BIT OFF FOR POR IN RI 
001110 #2$,$LPERR :SET LOOP POINTER TO 2$ 
2s: R1.KIPDR7 [LOAD KERNEL PDR 7 TO CLEAR v-B1T 

SRO,RO SREAD PRESENT CONTENTS” OF STATUS REG. 0 
RO, SRO SWRITE PRESENT CONTENTS OF SRO BACK TO ITSELF 
KIPDR7,R2 :READ CONTENTS OF KIPDR7 INTO R2 

R1,R2 WAS W-BIT LEFT CLEARED? 

0 BEQ 3$ “BRANCH IF YES 

025672 24 iweBlT IN K KIPDR? SET WHEN SRO WAS WRITTEN TO 

[FOR TIGHTER SCOPE LOOP 
; REPLACE ERROR CALL WITH 
:"BR 2$" = 000765 


025674 


7 
025740 


025742 
025746 


ooo 
NNN 


sssess 
VOSSSSuuun 
Wer NF 


— 
So 


001110 
000004 


172354 


#38, $LPERR 


: #KERSTK ,KSP 


KIPDR6,R2 
#100,R1 


3SET LOOP. ON ERROR POINTER TO 38 

LOAD KERNEL PDR6 WITH 77406 TO CLEAR eat 
:SET UP LOC. 4 TO 4$ FOR ODD a ABORT 
;CAUSE TIMEOUT ABORT THRU LOC. 

sRESTORE THE STACK POINTER 

;READ_KIPDR6 INTO R2 

R1-77506 


sWAS W-BIT SET? 
;BRANCH IF YES 
i= BIT WAS NOT SET DURING A TIMEOUT ABORT 
;FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
‘BR 3$" = 000757 


; RESTORE KIPDRO TO 77406 
RESTORE KIPAR6 TO 1400 
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2677 025754 012737 002076 000004 MOV #TIMERR ,ERRVEC + RESTORE NORMAL CPU TRAP ROUTINE TO LOC.4 
025762 012737 025630 001110 MOV #1$, SLPERR sRESET LOOP ON ERROR POINTER TO 1$ 
025770 004737 035134 JSR PC, TON ;TURN T-BIT TRAPPING BACK ON 


-aerttereerrerererereerrerrrereerererekerenenerenaeraeRererereeerese 


THE NEXT THREE (3) TESTS CAUSE MEMORY MANAGEMENT ERRORS 
TO CHECK THE ABILITY OF STATUS REGISTER 0 TO RECORD KT 


RO. RO AND SR2 LOGIC AND TH 
RT ERROR LOGIC ARE CHECKED. 


SPORE AAAAAAAAHKAAAAASAAAEAAAAAAAEAAALAATAAAAAARAEHRAAAAAAAAHRAEAERAAEE 


FRAAAAAHAAEA AAA AAA AAA TELA AAA AAEAAAAAAARARAARARAAAAAAARAAAAAAES 


:#TEST 31 NON-RESIDENT ABORT TEST (ACF=084) 


THIS TEST CHECKS THE ACCESS CONTROL FIELD (ACF) COMPARATOR 
LOGIC BY CAUSING NON-RESIDENT ABORTS IN yf KERNEL AND 
USER MODES. PDR 4 1S LOADED WITH ACF°S = 084 AND 

THEN PHYSICAL ADDR. 60000 1S ACCESSED TO CAUSE THE ABORT. 


RARER AAAHHAAAAAAAAEAELAAAAA AAA AAAAAARAAAAAAAAAAAERERARAEAEEE 


025774 : SCOPE 


025776 : sLOAD DATA FOR PAR'S INTO RO 
026002 0037 172346 :MAP KERNEL PAR'S 384 TO 12-16K 


sMAP USER PAR'S 384 TO 12-16K 


IPAR 
172306 ~~ KERNEL PDR 3 128 BLKS, oC pe 
177606 “WRITE 


Ss 


KERNEL, PG.4 


N RE 
Ow 


000250 $.AM 
R2,KIPORG 
R2,UIPDR4 
001110 #38, S$LPERR 


: (ROS 
001176 PSwW,STMPO SAVE PSw IN CASE OF ERROR 
: (R1) Y TO REF. IT USING PDR4 - aS TRAP TO 5$ 
cAER. MGMT. ABORT DID NOT OCCUR 
FOR TIGHTER SCOPE LOOP 
: REPLACE ERR Gott WITH 
026116 8$ BRANCH AROUND STATUS REG. CHECKS IF NO ABORT 
062706 000004 ., sRESTORE STACK POIN 
:D1D INSTRUCTION GET ABORTED & NOT EXECUTE 
BE 6$ BRANCH IF YES 
026130 INSTRUCTION WAS NOT ABORTED, LOC. GOT CHANGED 
:FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 


+ SHPeeeP E+ PEP 
WMUMNOOfM—nnrrrnrr 


ss 


026114 


ROMP RID — tt ot 
DUS WnM—-OOSnowVlur— 


MmMrowr 
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026272 
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177572 
177576 
001272 


026112 
001274 


160000 
140000 


100151 
140000 


077404 


077406 


100011 
177776 


002150 


060000 


0 
026336 
177776 
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177572 
001176 


177776 


001110 
000250 


000250 


001110 
001176 
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NON-RESIDENT ABORT TEST (ACF=084) SEQ 0056 
R 38" = 000764 
68: MOV SRO,WASSRO ae STATUS REGISTER 0 
MOV SR2.WASSR2 SREAD STATUS REGISTER 2 
CAP R3.WASSRO :Bha SRO REPORT NON-RESIDENT ERROR CORRECTLY? 
ERROR 30 *SRO DID NOT REPORT NON-RES. ERROR CORRECTLY 
[FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
:"BR 3$° = 000752 2 
7$: MOV #4$,R4 :LOAD RG WITH WHAT SR2 SHOULD READ 
CMP RG, WASSR2 D SR2 LOCKUP RIGHT VIRTUAL ADDR. (=4$)? 
BEQ 8$ : <BRANCH IF YES 
ERROR 31 '$R2 DID NOT LOCK VIRTUAL ADDR. OF NON-RES. ERROR 
[FOR TIGHTER SCOPE LOOP 
ZREPLACE ERROR CALL WITH 
:"BR 38" = 0007 
8$: BIC #160000,SR0 CLEAR THE ERROR BITS IN SRO 
BIT #140000.$TMPO  :HAS ACF=084 BEEN TESTED IN USER YET 
BNE 9$ ‘BRANCH IF YES 
MOV #100151,R3 [LOAD R3 WITH WHAT SRO SHOULD READ - N.R., USER, PG.4 
MOV: #140000.PSu :G0 TO USER MODE 
~*~ BR 2$ SREPEAT TEST IN USER MODE 
9$: CMP #77404 ,R2 SHAS ACF=4 BEEN TESTED YET? 
BEQ $ M4 “BRANCH IF YES 
MOV ?7404,R2> . . : THEN LOAD ACF=4 (NON-RES) PDR VALUE IN R2 
MOV #100011,R3'~ “_:LOAD-R3 WITH WHAT SRO S SHOULD READ-N.R. ,KERNEL,PG. 4 
CLR PSw -4 36 BACK TO KERNEL 
BR 2$ ~SKGO-BACK & TEST ACF=4 .§ E 
10$: CLR PSw 760 BACK TO KERNEL MODE BEFORE LEAVING 
MOV #1$, SLPERR ET -400P ON.ERROR POINTER TO 1$ 
MOV #MGHERR , MMVEC avtp ORE“ADDRESS OF NORMAL MEMORY 
A na AGEMENT ERROR ROUTINE TO MAVEC 
jeeneneeneeercereetereeeereeereeeeeeeerenerereereeeereeeeeneeres 
:#TEST 32 READ-ONLY ABORT TEST (ACF=2) eS, 
> THIS TEST CHECKS THE ACCESS CONTROL FIELD (ACK) COMPARATOR 
ie LOGIC BY CAUSING READ-ONLY ABORTS IN BOTH KERNEL AND 
:* USER MODES. POR 4 1S LOAD WITH ACF=2 AND TAEN 
* PHYSICAL ADDR. 60000 1S WRITTEN TO CAUSE THE “ABORT . F 
*® 
A hE A EL OTE AT MONTES: 8 
1$132: SCOPE 
1$: sKERNEL & USER PAR'S 3 t 4 AND POR 3 
‘ARE SETUP FROM CAST TEST 
MOV #60000,R0 LOAD VIRTUAL ADDR. TO REFERENCE POR3 INTO RO 
MOV #100000,R1 *LOAD VIRTUAL ADDR. TO REFERENCE POR4 ‘INTO R1 
MOV #20011,R3 [LOAD R3 WITH WHAT SRO SHOU D REA = R/O, KERNEL, PG.4 
MOV #77402 ..R2 *LOAD ACF=2 (READ-ONLY) cerck” LUE R2 
2$: MOV #5$,MMVEC ‘POINT MEM, MGMT, p veCt 0 sé BELOW 
MOV R2,KIPDRG SLOAD ACF=2 INTO K ORs 
MOV R2,UIPOR4 :LOAD ACF=2 INTO UIPDR4 
MOV #3$, SLPERR SET L ERROR POINTER TO 3$ 
3$: CLR (RO) [CLEAR PHYS. LOC. 60000 U PDR3 
MOV Psy. STHPO “SAVE PSw IN CASE OF ER aba. 
4$: INC (R1) ‘TRY TO WRITE USING PDR4 = SHOULD TRAP TO 5$ 


ed 


=z, 3 * 
~s 


~ ab} 
’ 
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026350 104026 26 ;MEH. MGMT. ABORT DID NOT OCCUR 
SFOR TIGHTER SCOPE LOOP 
: = REPLACE ERROR CALL WITH 
026352 000425 8s SBRANCH AROUND STATUS REG. CHECKS IF NO ABORT 
026354 062706 000004 : #4 SP _ ERESTORE STACK POINTER 
026360 (RO) :D1D INSTRUCTION GET ABORTED & NOT EXECUTE 
026362 BEQ 6S , ZBRANCH IF YES 
026364 104027 27 SINSTRUCTION WAS NOT ABORTED, LOC. GOT CHANGED 
ZFOR TIGHTER SCOPE LOOP 
SREPLACE ERROR CALL WITH 
:"BR 3S" = 000764 


013737 001272 68: SRO, WASSRO TREAD STATUS REG. 0 
: SR2.WASSR2 : READ STATUS REG. 2 
R3,WASSRO SRO REPORT READ-ONLY ERROR CORRECTLY? 
7$ BRANCH IF Yes 
30 SRO DID NOT REPORT R/O ERROR CORRECTLY 
FOR TIGHTER SCOPE LOOP 
ZREPLACE ERROR CALL WITH 
 . "B38" = 000752 
026346 #4$,RG TLOAD R4 WITH WHAT SR2 SHOULD READ 
001274 R4, GASSRe DID SR2 LOCKUP RIGHT VIRTUAL ADDR. (=4$)? 
88 ~  FBRANCH IF Y 
31 SR2 DID NOT LOCKUP VIRTUAL ADDR. OF R/O ERROR 
, POR TIGHTER SCOPE LOOP . 
ZREPLACE ERROR CALL WITH 
:"BR 38" = 000744 
160000 177572 8$: #160000,SRO «CLEAR THE ERROR BITS IN SRO 
140000 001176 ; #140000, $1HPO :HAS ACES BEEN TESTED IN USER MODE? 
020151 : #20151,R3 LOAD R3 WITH WHAT SRO SHOULD READ-R/O, USER, PG.4 
140000 177776 #140000,PSW GO TO USER MODE 
2$ REPEAT TEST IN USER MODE 
177776 PS 360 BACK TO KERNEL MODE BEFORE LEAVING 
026272 001110 #1$,SLPERR RESET LOOP ON ERROR POINTER TO 1$ 
002150 000250 WMGMERR MMVEC RESTORE ADDRESS OF NORMAL MEMORY 
:MANAGEMENT ERROR ROUTINE TO MMVEC. 


04 
03 
00 
01 
01 


{288 


eeeeeeeeeeeeeeeeeeeereeeeeeeeeeeeeeeeeeeAeeeeeReeeeeAeeeeeeAees 


THE NEXT TWO (2) TESTS WILL a CHECKING THE PAGE LENGTH 
COMPARATORS AND SOME MORE OF THE KT ERROR DETECTION = 
AND STATUS LOGIC. THE PAGE LENGTH FIELD (PLF) - KERNEL «=: 
POR 4 1S VARIED AND FOR EVERY PLF, THREE (3) VIRTUAL 

ADDRESSES ARE READ. WHILE USING BOTH UPWARD & DOWNWARD oy 
EXPANSION, ONE OF THOSE THREE VIRTUAL ADDRESSES WILL CAUSE A 


Be Be Be Be Be Be Be Be 
see e828 8 8 8° 
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— 


2 94 7° "PAGE LENGTH ABORT’ WHILE THE OTHER TWO WON'T. 
’ *@ P 

2847 ye STATUS REGISTER 0 & 2 ARE CHECKED WHEN THE PAGE LENGTH 
2848 ye ABORT DOES OCCUR TO SEE THAT THE ABORT IS REPORTED AND THAT 
2849 - ® -  ° THE VIRTUAL ADDRESS OF THE INSTRUCTION THAT CAUSED THE ABORT 
s800 ae ge 1S LOCKED UP. 

a 
2852 MPTTITITITITIITITI TIT TITiTTiLi TLL LLL LLL 
2853 
2854 
2855 
2856 SP RAAAAAAATAAAAA AAA AAA TEAR AAA AAA EAAAAAAAAAAAAAARAAAKARERAAAAEe 
344 seTest 33 PAGE LENGTH FAULTS-UPWARD EXPANSION 
2859 + THIS TEST VARIES THE PAGE LENGTH FIELD (PLF) IN KERNEL POR 4 
2860 * FROM 1 10 177 AND FOR EACH PLE THREE VIRTUAL ADDRESSES (VBA'S) 
2861 * ARE ACCESSED. WHEN VBA <12:6> IS LESS THAN OR EQUAL TO PDR <14:8> 
2862 ;* NO ABORT SHOULD OCCUR. WHEN VBA o~A 1S GREATER THAN PDR <14:8>, 
2863 * A PAGE LENGTH ABORT SHOULD OCCUR AND BE REPORTED BY SRO & SR2. 
2864 * THE PAGE EXPANSION DIRECTION IN THIS TEST 1S UPWARD, (THE ED BIT 
2865 3 (BIT 3) OF POR 4 = 0). 

* 
2867 MITT itiitiitiiitiitiiiiiitiiiiiiiiiiiii iit iiiiii i 
2868 026500 1133: SCOPE 
2869 026502 012737 077406 172306 1$: MOV #77406,KIPDR3 ;:MAKE SURE PDR3 1S DESCRIBED AS R/ 
2870 026510 012737 077406 172312 MOV #77406,K1PDRS —;MAKE SURE PDR5 1S DESCRIBED AS R/w 
2871 026516 012700 026776 MOV #DALTB1,RO ;DAL TABLE FOR VIRTUAL ADDR'S. TO SELECT PDR4. 
2872 026522 012704 027014 MOV #PDRTBI RG ‘POR TABLE FOR PDR4 (COINCIDES WITH DAL TABLE). 
2873 026526 012701 000006 MOV ; :SET UP LOOP COUNTER. 
2874 026532 012737 026710 000250 MOV #9$ ,MMVEC ‘SETUP M.M. TRAP VECTOR FOR UNEXPECTED ABORTS 
2875 026540 012737 026552 001110 MOV #2$,S$LPERR :SET LOOP ON ERROR POINTER TO 2$ 
2876 026546 012706 001100 MOV #KERSTK,KSP *MAKE SURE STACK POINTER IS ALL SET UP 
2878 3; TEST NON-ABORT — (VBA < OR = PLF) 
2879 026552 012437 172310 2s: MOV (R4)+,KIPDR4 | ;LOAD KIPDR4 WITH PAGE LENGTH VALUE 
2880 026556 005730 TST a(RO)+ sACCESS VIRTUAL ADDR. (VBA < OR = PLF) 
2881 :NO ABORT SHOULD OCCUR!!! 
eons 026560 077104 $OB R1,2$ :DONE?...NO- TEST NEXT COMBINATION OF DAL & PDR. 
2884 -TEST ABORT CASES (VBA > PLF) 
2885 026562 012701 000005 3: MOV #5,R1 :SET UP LOOP COUNTER. 
2886 026566 012700 027032 MOV #DALTB2,RO ‘DAL TABLE 
2887 026572 012704 027046 MOV #PDRTB2,R4 :PDR TABLE 
2888 026576 012737 026612 001110 MOV #4$,SLPERR :SET LOOP ON ERROR POINTER TO 4$ 
2889 02 012737 026624 000250 MOV #6$,MMVEC :SETUP M.M. TRAP VECTOR FOR EXPECTED ABORT 
2891 026612 012437 172310 4$: MOV (R4)+,KIPDR4 LOAD KIPDR4 WITH PAGE LENGHT VALUE 
2892 026616 005730 5$: TST a(RO)+ sACCESS VIRTUAL ADDR. (VBA > PLF - ABORT TO 6$) 
2893 026620 104033 ERROR 33 ‘EXPECTED PAGE LENGTH ABORT DID NOT OCCUR 
2894 :FOR TIGHTER SCOPE LOOP 
2895 ; REPLACE ERROR CALL WITH 
2896 :"BR 5$" = 000776 
2897 026622 000424 BR 8$ ‘BRANCH AROUND ABORT CHECKS 
2898 026624 012706 001100 6S: MOV #KERSTK,KSP sRESTORE STACK POINTER FOLLOWING ABORT 
2899 026630 013737 177572 001272 MOV SRO, WASSRO [READ M.M, STATUS REG. 
2900 026636 013737 177576 001274 MOV SR2,WASSR2 “READ M.M. STATUS REG. 2 
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#5$,R3 
R3,WASSR2 
8$ 


35 


#160000 ,SRO 
R1,4$ 


(KSP)+, TRAPPC 


H 5 
29-JAN-79 15:10 PAGE 59 
PAGE LENGTH FAULTS-UPWARD EXPANSION 


sPUT EXPECTED SRO CONTENTS IN R2 
D SRO REPORT PG. LENGTH ABORT, PAGE 4, KERNEL? 


ZBRANCH IF 


YES 
SRO DID NOT REPORT PG. LENGTH ABORT CORRECTLY 
FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
R 5$"° = 000757 


‘put EXPECTED SR2 CONTENTS IN R3 
BRA SR2 LOCKUP VIRT. ADDR. OF ABORTED INSTRUCTION? 


RANCH IF YES 
3SR2 DID NOT LOCKUP VIRT. ADDR. OF ABORT CORRECTLY 
FOR TIGHTER SCOPE LOOP 

:REP LACE ERROR CALL WITH 

:"BR 5$°° = 000751 

;CLEAR ERROR BITS IN SRO 

:DONE?..NO - GET NEXT DAL & PDR PAIR 


:YES... 
sSAVE PC & PS OF TRAP 


kk td at ot ot 
° 


(KSP) +, TRAPPS 
001272 SRO, WASSRO 
001274 SR2.WASSR2 
0267 177572 BIC #160000,SRO 
026742 104032 32 


sSAVE CONTENTS OF SRO FOR ERROR 

sSAVE CONTENTS OF SR2 FOR ERROR 

;CLEAR ERROR BITS IN SRO 

GOT PG. LENGTH ABORT BEFORE IT WAS EXPECTED 
;FOR TIGHTER SCOPE LOOP 


;REPLACE sa WITH 
026744 013746 001270 TRAPPS ,~(KSP) PUT PC & PS OF TRAP ON STACK 
026750 013746 001266 TRAPPC ,-(KSP) 
026754 000002 sRETURN FROM UNEXPECTED ABORT 


026756 012737 026502 001110 #1$,SLPERR ;RESET LOOP ON ERROR POINTER TO 1$ 
026764 012737 002150 000250 WAGMERR.MMAVEC ;RESTORE NORMAL A.M. TRAP HANDLER 

;ADDRESS TO M.M. TRAP VECTOR 
026772 027062 TS134 


DAL TABLE FOR UPWARD EXPANSION (NON-ABORT CASES) 
ocerrs DALTBI: 100000 


SSSSOSS 
rmrnty 


027012 


;PDR TABLE FOR KPDR4 (NON-ABORT CASES) 
027014 PDRTB1: 000006 
052006 


som. aaa (ABORT CASES) 
027032 DALTB2: 100100 
027034 110100 
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0734 
077006 


SP RAAAAAAAAAKAAAAAAAAAA TERA AAAAAAKAAAARAAAAAARRIKAAARAKAAARAKee LAAs 


2 *TEST 34 PAGE LENGTH FAULTS-DOWNWARD EXPANSION 


THIS TEST VARIES THE PAGE LENGTH FIELD (PLF) IN KERNEL P 

FROM 176 TO 0 ANO FOR EACH PLF, THREE V1 > ADDRESSES (VBA'S) 

ARE ACCESSED. WHEN VBA <12:6> IS GREATER THAN OR EQUAL TO POR <14:8> 

¥ PAGE ABORT SHOULD OCCUR. WHEN VBA <12:6> IS LESS THAN PDR <14:8> 
A PAGE LENGTH ABORT SHOULD OCCUR AND BE REPORTED BY SRO & SR2. 

nis tat tenueil, DIRECTION IN THIS TEST 1S DOWNWARD, THe ED BIT 


“REAR AASAAAAAAAAAAAKAEAAAATAAAAAAAAAAAAAARAAAAARAAARAAAARAERAREAAEE 


18134: 
#DALTB3,RO ;DAL TABLE FOR VIRTUAL ADDR'S. TO SELECT PDR4. 
#PDRTB3,R4 :POR TABLE FOR PDR4 (COINCIDES WITH DAL TABLE). 
#6,R1 :SET UP LOOP COUNTER. 
000250 #9% ,MAVEC ; SETUP M.M. TRAP VECTOR FOR UNEXPECTED ABORTS 
2 001110 #2$,SLPERR LOOP ON ERROR POINTER TO 2$ 
027114 001100 #KERSTK ,KSP MAKE SURE STACK POINTER IS ALL SET UP 


; TEST NON-ABORT CASES (VBA > OR = PLF) 
027120 172310 2s: MOV (R4)+ , KIPDR4 LOAD KIPDR4 WITH PAGE LENGTH VALUE 
027124 TST a(RO)+ sACCESS VIRTUAL ADDR. (VBA > OR = PLF) 
:NO ABORT SHOULD OCCUR!!! 
027126 $0B R1,2$ ;DONE?...NO- TEST NEXT COMBINATION OF DAL & POR. 


“TEST ABORT CASES (VBA < PLF) 
000005 S$: MOV #5,R1 :SET UP LOOP COUNTER. 
#DALTB4 RO ‘DAL TABLE 
#PDRTB4 RS :PDR TABLE 
001110 #4$,SLPERR *SET LOOP ON ERROR POINTER TO 4$ 
027172 000250 #6$, MMVEC :SETUP M.M. TRAP VECTOR FOR EXPECTED ABORT 


172310 : (R4)+ , KIPDR4 ;LOAD KIPDR4 WITH PAGE LENGHT VALUE 
: T a(RO)+ sACCESS VIRTUAL ADDR. (VBA < PLF = ABORT TO 6$) 
33 sEXPECTED PAGE LENGTH ABORT DID NOT OCCUR 
:FOR TIGHTER SCOPE LOOP 
: REPLACE ERROR CALL WITH 
‘BR 5$"' = 0007 


; 6 
027170 8$ : BRANCH AROUND ABORT CHECKS 
027172 : #KERSTK,KSP sRESTORE STACK POINTER FOLLOWING ABORT 
027176 001272 SRO ,WASSRO ;READ M.M. STATUS REG. 0 


awe ee eee ee 


mB amnG Se Se Se Se Se Se Be Se Be Se 


027344 
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3013 027204 013737 177576 001274 © MOV SR2,WASSR2 ;READ M.M. STATUS REG. 2 
3014 027212 012702 040011 MOV #40011 ,R2 “PUT EXPECTED SRO CONTENTS IN R2 
3015 027216 020237 001272 CMP a2. WASSRO [DID SRO REPORT PG. LENGTH ABORT, PAGE 4, KERNEL? 
3016 027222 001401 BEQ 7$ [BRANCH IF YES 
3017 027224 104034 ERROR 34 [SRO DID NOT REPORT PG. LENGTH ABORT CORRECTLY 
3018 [FOR TIGHTER SCOPE LOOP 
3019 ;REPLACE ERROR CALL WITH 
3020 R 5$" = 0007 
3021 027226 012703 027164 7s: MOV #5$,R3 PUT EXPECTED SR2 CONTENTS IN R3 
3022 027232 020337 001274 CMP R3,WASSR2 :D1D SR2 LOCKUP VIRT. ADDR. OF ABORTED INSTRUCTION? 
3023 027236 001401 BEQ 8% *BRANCH IF YES 
3024 027240 104035 ERROR 35 :SR2 DID NOT LOCKUP VIRT. ADDR. OF ABORT CORRECTLY 
3025 [FOR TIGHTER SCOPE LOOP 
3026 ;REPLACE ERROR CALL WITH 
3027 :"BR 5$" = 000751 
3028 027242 042737 160000 177572 83: BIC #160000,SR0 CLEAR ERROR BITS IN SRO 
3029 027250 077135 $0B R1,4$% > DONE?. .NO - GET NEXT DAL & PDR PAIR 
3030 027252 000137 027324 MP 10$ : YES... 
3031 027256 012637 001266 9$: MOV (KSP)+, TRAPPC sSAVE PC & PS OF TRAP 
3032 027262 012637 001270 MOV (KSP)+, TRAPPS 
3033 0272 013737 177572 001272 MOV SRO, WASSRO sSAVE CONTENTS OF SRO FOR ERROR 
3034 027274 013737 177576 001274 MOV SR2.WASSR2 >SAVE CONTENTS OF SR2 FOR ERROR 
3035 027302 042737 160000 177572 BIC #160000,SRO [CLEAR ERROR BITS IN SRO 
3036 027310 104032 ERROR 32 GOT PG. LENGTH ABORT BEFORE IT WAS EXPECTED 
3037 [FOR TIGHTER SCOPE LOOP 
3038 ;REPLACE ERROR CALL WITH 
3039 [A NOP" 024 
3040 027312 013746 001270 MOV TRAPPS,-(KSP) :PUT PC & PS OF TRAP ON STACK 
3041 027316 013746 001266 MOV TRAPPC ,-(KSP) 
3042 027322 000002 RTI ;RETURN FROM UNEXPECTED ABORT 
3044 027324 012737 027064 001110 10%: Mov #1$, SLPERR :RESET LOOP ON ERROR POINTER TO 1$ 
3045 027332 012737 002150 000250 MOV #AGMERR ,MMVEC sRESTORE NORMAL M.M. TRAP HANDLER 
3046 [ADDRESS TO M.M. TRAP VECTOR 
$047 027340 000137 027430 JMP $135 
3049 :DAL TABLE FOR DOWNWARD EXPANSION (NON-ABORT CASES) 
3050 027344 117700 DALTB3: 117700 
3051 027346 111600 111600 
3052 027350 115400 115400 
3053 027352 115200 115200 
3054 027354 104000 104000 
3055 027356 113100 113100 
3056 027 100000 100000 
3058 ;PDR TABLE (NON-ABORT CASES) 
59 027362 077416 PDRTB3: 77416 
3500 027364 025416 25416 
3061 027 032416 32416 
3062 027370 025416 25416 
3063 027372 003016 03016 
3064 027374 052416 52416 
3065 027376 000016 00016 
3067 :DAL TABLE (ABORT CASES) 
3068 027400 117600 DALTB4: 117600 
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9 027402 
027404 


027412 


:PDR TABLE (ABORT CASES) 
027414 , PDRTB4: 77416 


027426 


FF RORAAAAAA AAA EAHA AAA AAAEAAAAAAEARAAAARAEAAAARTARAAAAAAAAEE 


s*TEST 35 SR2 BIT TEST 


THIS TEST CHECKS THE BITS IN MEMORY MANAGEMENT REGISTER 2 BY 
a tte “READ-ONLY ABORTS*’ AT VIRTUAL ADDRESSES BETWEEN 100000 

0 110000 (PHYSICAL ADDRESSES 060000-070000). KIPDR4 IS USED TO EXECUTE 
THE FOLLOWING FOUR WORDS OF CODE WHICH ARE MOVED THRU MEMORY: 
010727 MOV PC,(PC)+* ; THIS INSTRUCTION SHOULD CAUSE A R/O ABORT 
000000 3171S VIRTUAL oo SHOULD BE LOCKED UP IN SR2 
000137 JMP ar3s ; ON 1S ALSO MOVED THRU MEMORY 
(ADDR. OF 3$) AS ‘0 ABORT DOES NOT OCCUR, 

IN GHicH CASE SR2 WILL NOT CONTAIN CORRECT ADOR. 


REAR AAEEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAEAREE 


135: 
#600, KIPAR3 :BE SURE PAR3 1S MAPPED TO 12-16K 
[BE SURE PAR4 1S MAPPED TO 12-16K 
128 BLOCKS, R/W 
#77402 KLPDR4 128 BLOCKS, READ-ONLY 
SLOAD RO WITH VIRTUAL ADDR. WHICH USES PDR3 
00008 8 a1 [LOAD R1 WITH VIRTUAL ADDR. WHICH USES PDR4 
As :SET M.M. TRAP VECTOR TO 3$ 
0275 928.30 :SET LOOP ON ERROR POINTER TO 2$ 
010727 LN tro¢ ; LOAD "MOV PC, (PC)+" INSTRUCTION AT ADDR. 


REACHED THRU 

000137 #000137 -(RO)# SLOAD "UMP GA3$"" INSTRUCTION AT VIRT. ADDR. 

027526 IN CASE R/O VIOL. DOES . 
R1,PC TRANSFER PROGRAM EXECUTION 10 “PAGE 4 INSTRUCTIONS 

001100 : WKERSTK,KSP © ; RESTORE STACK POINTER 

177576 001274 SR2,WASSR2 :READ CONTENTS, OF STATUS REG 2 

001274 " RI WASSR2 WAS ADDR. OF “RELOCATED ~ R/O ABORT’ LOCKED UP? 


Q H IF YES 
027546 36 ;SR2 DID NOT LOCK UP VIRTUAL ADDR. OF R/O VIOL. 
iF GHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
"BR 28" = 0007 
027550 160000 177572 : BIC . ; CLEAR THE ERROR BITS IN SRO 
SETUP TO FORM NEXT VIRTUAL ADDRESS 


75 ;SETUP RO TO FORM NEXT VIRT. ADDR. TO LOAD 
027562 100000 BIS FORM VIRTUAL ADDR. THAT SHOULD BE LOCKED UP NEXT 


2332 
3 


eu. eounneneneaeeeen: 


i 
1 
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Sooooooo°cKeo 
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027566 52700 060000 #60000 ,RO sPOiNT RO TO NEXT VIRT. te TO LOAD 
027572 110000 R1,#110000 ‘HAVE ALL VBA'S 100000-110000 BEEN TESTED? 
027576 2s ‘BRANCH IF NO 


027432 001110 : #1%,SLPERR sRESET LOOP ON ERROR POINTER TO 1$ 
077406 172310 #77406, KIPOR4  ;RESTORE PDR4 TO R/W ACCESS 
027614 002150 000250 #AGMERR ,MAVEC ;RESTORE ADDRESS OF NORMAL A.M. 
; TRAP HANDLER TO M.M. VECTOR 


FRERAAAAAAAAA AAAS AAA AAAE AAA AAAAAAAAAAAAAAAAAAAAAAAARAAAAKAAAAEE 


;#TEST 36 MORE CHECKS OF SRO & SR2 


THIS TEST PERFORMS SOME ADDITIONAL CHECKS OF THE SRO & SR2 LOGIC. 

FIRST 17 CHECKS THAT , ora ame te ACTING AS A VIRTUAL ADDRESS 
PROGRAM COUNTER. ALSO SRO & SR2 ARE LOCKED UP rs A PAGE LENGTH 

ABORT, THEN WITHOUT LEARING SRO*S ERROR BITS, A R/O ABORT IS CAUSED. 

SRO & SR2 SHOULD NOT BE CHANGED BY THE SECOND ABORT AND THE 

INFORMATION ABOUT THE PAGE LENGTH ABORT SOULD STILL BE an UP. 

IN ADDITION A “‘RESET’’ 1S EXECUTED TO VERIFY THAT SRO IS ARED 

AND SR2 IS UNLOCKED BY A RESET. AFTER MEMORY MANAGEMENT. is TURNED BACK ON, 
SR2 1S CHECKED TO SEE THAT IT 1S TRACKING AGAIN. 


RAHA AAEAAEAAAAEARAAASAA KAKA ATA AAAEAAAAAAARAAAAAAAAARAAAEEAAAAAAAEe 


#600, K1PARS ;MAP KERNEL PAGE 5 TO 12-16K 
PORG [SETUP PDR4 FOR PAGE LENGTH ABORT 
rrrabe, KIPDRS :SETUP PDRS FOR R/O ABORT 
#2$,SLPERR SET LOOP ON ERROR POINTER TO 2$ 
SR2, “UASSR? “READ SR2 TO SEE IF ITS TRACKING 
#2$.R1 :PUT EXPECTED VIRTUAL PC IN R1 
001274 R1 ,WASSR2 [DID SR2 CONTAIN VIRTUAL PC AT 2$? 
3$ SBRANCH IF YES 

41 '$R2 NOT TRACKING CORRECTLY 

[FOR TIGHTER SCOPE LOOP 

[REPLACE ERROR CALL WITH 

:"BR 2$"° = 000767 


027704 : #4$,SLPERR 3 SET LOOP ON ERROR POINTER TO 4$ 
: SR2,WASSR2 D SR2 TO SEE IF ITS TRACKING 

#4$,R1 PUT EXPECTED VIRTUAL PC IN RI 
001274 ey UNSERE DID SR2 CONTAIN VIRTUAL PC AT 4$ 


sBRANCH IF YES 
41 4 NOT joeveios CORRECTLY 
R TIGHTER SCOPE LOOP 
tREP LACE ERROR CALL WITH 
‘BR 4$" = 000767 
027734 : #6$,S$LPERR 3SET LOOP. ON ERROR POINTER TO 6$ 
: #7$ ,MAVEC :PUT ADDRESS OF +P a M.M. TRAP VECTOR 
STMP1 :CLEAR ERROR INDICA 
a#100500 :CAUSE PAGE LENGTH ABORT = TRAP 10 7$ 
#KERSTK ,.KSP ; RESTORE STACK at dd AFTER ABORT 
SRO, STMPO SAVE SRO'S INFORMATION ON PG. LGTH. ABORT 
SAVE SR2'S INFORMATION ON PG. LGTH. ABORT 
PUT ADDRESS OF 8$ IN M.M. TRAP VECTOR 
a ;CAUSE R/O ABORT = TRAP 
001100 : #KERSTK .KSP sRESTORE STACK POINTER AFTER ABORT 
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w 
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o 
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177572 SRO ,WASSRO sREAD SRO FOLLWOING SECOND KT ABORT 
SR2,WASSR2 ;READ SR2 FOLLOWING SECOND KT ABORT 
STMPO,WASSRO :1S SRO STILL HOLDING INFO ON FIRST ABORT? 
9% :BR ANCH IF YES 
‘ STAPI sSET ERROR INDICATOR 
001274 : ri. eens :DOES mE Tes HOLD PC OF FIRST ABORT? 


STAMP) 

STAP1 

11$ ; RANCH aT NO 

37 ONE OF STATUS REGS. CHANGED BY SECOND ABORT 
sFOR TIGHTER SCOPE LOOP 
; REPLACE ERROR CALL WITH 
“BR 6$"* = 00072 


001200 : STMP1 CCLEAR ER ROR INDICATOR 
‘EXECUTE A RESET, APPLYING AN “INIT" 
177572 001272 MO SRO,WASSRO [READ SRO 


AD S 
001272 WASSRO WAS SRO CLEARED BY THE RESET? 
128 sBRANCH IF YES 
601200 STMP1 :SRO NOT CLEARED BY A RESET 
177576 : MO SR2,WASSR2 READ SR2 
030112 #12$,,WASSR2 WAS SR2 UNLOCKED BY A RESET? 
13$ + BRANCH IF YES 
001200 STMP1 SR2 NOT UNLOCKED BY A RESET 
001200 : STMP1 SUERE SRO & SR2 BOTH “'RESET’’ BY A RESET? 
14$ sBRANCH IF YES 
40 ;SRO OR SR2 NOT ‘'RESET’’ BY A RESET 
FOR TIGHTER SCOPE LOOP 
;REPL ACE ERROR CALL WITH 
A. a = 000676 


ON a aa tt at sss Ss ss Ss Ss os Ss Ss 
SSSLESFANLSSELERLAT 


w tt tp be pepe pope pope bebe pe pepe pepe pepe 
=] 
—_ 


000001 #1,SRO ; TUR N REMORY MANAGEMENT BACK ON 
SR2 ,WASSR2 ;READ SR2 TO SEE IF ITS TRACKING AGAIN 
#15$,R1 sPUT EXPECTED VIRTUAL PC INR 
001274 R1 ,WASSR2 DID SR2 CONTAIN VIRTUAL PC AT 15$ 
16$ + BRANCH IF YES 
41 3SR2 NOT TRACKING CORRECTLY 
FOR TIGHTER SCOPE LOOP 
;REPL ACE ERROR CALL WITH 
"BR 6$" = 000663 


027624 : #1$,SLPERR ;RESE LOOP ON ERROR POINTER TO 1$ 
077406 #77406, KIPOR4 =; t ° R/W 

077406 #77406 ,KIPDRS 
002150 #AGMERR ,MAVEC L_ MEMORY 
MANAGEMENT TRAP ROUTINE To M.M. VECTOR 


53 SHAH AATAAAAAAAKAET AAA AE ETAT AAAAAAAAAAAAAAEAAARAAREAAEAAAAeS 


s*TEST 37 USER ABORT PICKS UP KERNEL SPACE VECTOR 


THIS TEST CHECKS TO BE SURE THAT WHEN AN ABORT OCCURS yi IN 
USER MODE, THE TRAP cree INFORMATION FETCHED IS TAKEN FROM 
KERNEL SPACE. USER PAGE 0 1S MAPPED TO 12k (60000-77776) SO 
THAT IF USER SPACE IS USED INSTEAD OF KERNEL, THE NEW . THAT 
WAS LOADED AT LOC. 060004 IS USED INSTEAD OF THE NEW PC THAT 
SHOULD BE PICKED UP. ;ROR LOC. 000004. A TIMEOUT ERROR IS USED 
TO CAUSE A TRAP TO ° 


Be Be Be Be Be Be Be Be 
es eeeeeenee 
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3 


SAS NON 
ANON 2~N 


PC, TOFF s TURN OFF T-BIT TRAPPING FOR THIS TEST 
001110 #28 SLPERR SET : LOOP ON ERROR POINTER 10 2% 


Sw 360 TO KERNEL 
@KERSTK ,KSP : SETUP KERNEL STACK PTR. 
177640 #600 ,UI1PARO P USER PAGE 0 TO 12k 
000004 $084 ELOAD KERNEL VECTOR 4 (LOC.4) WITH 4$ 
000006 4g VECTOR¢2 WITH NEW PSW 
177776 TO USER MODE 
Setup USER STACK PTR. 
000004 LOAD USER VECTOR ‘ (LOC. 60004) WITH 3% 
000006 sLOAD VECTOR¢2 WITH NEW PSY 
1600 ;CAUSE TIMEOUT ERROR TRAP TO ‘4’ 
; SHOULD a UP NEW PC=4$ FROM KERNEL 
LOC. 4, PC=3$ FROM USER LOC. 4 (=60004) 
7 SAVE piu t FOR ERROR 
: SAVE VALUE OF STACK POINTER FOR ERROR 
;BE SURE BACK IN KERNEL MODE 
:D1D NOT TRAP THRU KERNEL SPACE 
;FOR TIGHTER SCOPE LOOP 


=. 
—_ 


ooooocoooococo 
SSss sysssssssssss 
gecocecoes 


oooo 
ae pet eee 
SSF 
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000004 
012737 


104060 


012737 


177776 
001100 


035134 


030426 


030444 
177776 


007437 
177776 


030414 


MACY11 30A(1052) 
137 


177776 


000004 
001110 
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PSW 
#KERSTK .KSP 
UIPARO 
#140000 ,PSw 
#USESTK ,USP 
PSW 


STIMERR 284 
#1%,SLPERR 


a 


+ REPLACE ERROR CALL WITH 
:BR 28" = 00074 


:BE SURE BACK IN KERNEL MODE 

RESTORE KERNEL S.P. IN CASE IT CHANGED 
REMAP USER PAGE 0 TO 0-4k 

G0 TO USER MODE 

RESTORE USER STACK POINTER 

:GO0 BACK TO KERNEL MODE 

RESTORE ADDR. OF NORMAL CPU TRAP HANDLER TO 4 
;RESET LOOP ON ERROR POINTER TO 1$ 

;TURN T-BIT TRAPPING BACK ON 


fF RRRAAAREAAAE AEE A AREA EKER ATES KAAAAAAAAAAAAAAAARATAAEARERAAAREAAAEE 


RTI IN USER MODE DOES NOT CHANGE PSW 


THIS TEST CHECKS TO SEE THAT WHEN AN RTI IS EXECUTED IN USER 
MODE, THE MODE OR PRIORITY BITS OF THE PSW ARE NOT CHANGED. 


REREATAETEAAAESETAEKAAAAEAAATAAAAAAAAAAAAAAAAAAAAARAARAARAAARAARARAARE 


001110 


s*TEST 40 
-* 


SCOPE 


001110 4$: 


#2%, S$LPERR 
#170000,R2 
R2,PSW 
#340,-(SP) 
#3$,-(SP) 
eres, RI 
nt R1 

20 


#1$,S$LPERR 


;SET LOOP ON ERROR POINTER TO 2$ 

[LOAD "PRESENT & EXPECTED’ PSw VALUE INTO R2 
:GO0 TO USER MODE-PRIORITY 0 

;PUT A NEW PSU tege higy ON STACK 


OR 
MASK OFF COND. CODE, T-BIT. AND UNUSED BITS 
:G0 BACK TO KERNEL MO 
7010 PSW Pits USER, PRIORITY=0? 


;BRANCH IF 

:PSW CHANGED BY AN RT] FROM USER 
:FOR A TIGHTER SCOPE LOOP 

; REPLACE ERROR CALL WITH 

;‘'BR=2$"" = 000760 

;RESET LOOP ON ERROR POINTER TO 1$ 
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Fp PERE HHK AAA AAAS HAKH SKA AAAHAE KALA TH EAAAAAERAAAAAAAAAARAAAAAAAAET 


3 
3299 ;*TEST 41 KT ERROR SERVICED BEFORE TIMEOUT ERROR 


3301 THIS TEST CHECKS TO SEE THAT IF A CERTAIN VIRTUAL ADDRESS THAT 
WOULD CAUSE A MEMORY MANAGEMENT ERROR CAUSES A TIMEOUT 

ERROR FIRST, THE TIMEOUT ERROR IS SERVICED BUT THE MEMORY 
MANAGEMENT ERROR ISN'T. THIS MEANS THAT SRO AND SR2 

SHOULD NOT REPORT THE ERROR OR LOCK UP ITS VIRTUAL ADDRESS. 
— VIOLATION 1S USED AS THE POTENTIAL MEMORY MANAGEMENT 


BS333 


SSSSSEs 


RAHAT EAAAEAAAAAAAAAETAAEATAAAAAAAKAAAKAARAAAAARAAAAAAAAEARAAAAAAAAEE 


— 
#77006 ,RS ;LOAD PDR7 DATA INTO RS 
R5,KIPOR? [MAP PAGE 7 R/W PLF=176 
038,084 [SET CPU TRAP VECTOR TO ADDRESS OF 3$ 
#4$.a#250 SET M.M. TRAP VECTOR TO ADDRESS OF 4$ 
#2%.S$LPERR :SET LOOP ON ERROR POINTER TO 2 
177700 ; a#177700 [CAUSE PLF ABORT AND POTENTIAL TIMEOUT 
: 43 STRAPPED THRU CPU TRAP VECTOR” BUT SHOULDN'T HAVE 
[FOR TIGHTER SCOPE LOOP 
ZREPLACE ERROR CALL WITH 
3"BR 28" = 000776 
001100 : #KERSTK,KSP TRESTORE STACK POINTER AFTER TRAPPING 
SRO,WASSRO [READ STATUS REG.O 
SR2,WASSR2 SREAD STATUS REG. 2 
040017 MO #40017,R0 “LOAD EXPECTED SRO CONTENTS INTO RO 
001272 RO,WASSRO :SRO PLF ERROR BIT 
6$ ;BRAN NCH IF YES 
b4 SRO DIDN'T REPORT PLF ERROR 
soOR TIGHTER SCOPE LOOP 
:REPLACE ERROR CALL WITH 
:"BR 2$" = 000741 
030530 #2$,R1 TLOAD EXPECTED SR2 CONTENTS INTO R1 
001274 R1,WASSR2 [WAS SR2 LOCKED BY PLF ABORT? 
7$ SBRANCH IF YES 
ht :SR2 DIDN'T LOCK UP VIRTUAL ADDRESS 
:FOR TIGHTER SCOPE LOOP 
[REPLACE ERROR CALL WITH 
:"BR 2$" = 0007 


; 41 

177572 : #160000 ,SRO ;CLEAR ERROR BITS THAT WERE SET IN SRO 
#TIMERR 244 ; 
WMGMERR,a#250 RE F NORMAL M.M. TRAP HANDLER 
#77406,KIPOR7? ;REMAP PAGE 7 TO READ/URITE PLF=177 

030476 001110 #1$,SLPERR ;RESET LOOP ON ERROR POINTER TO 1$ 


wu: eouaeennea' 


——B aoe Ge Ge Ge Ge Se Ge Ge Se Ge Ge 


AAAI AINA 
POR QIRD et et ed et et ot ot ot 
mC Seno uvlwn—o 


hye yeh yaya tyatyet yah ye pih ya hgh yet gab ik yay yk art yarh yah york gi 


SEERA AEEAAAAAAAEAAAAAEKATAAAAAAAAAAARAAAAAKAAAAEEAAeAAA es 


*TEST 42 PC & PSW SAVED FOR KT ERROR DURING SERVICE OF TIMEQUT ERROR 


THIS TEST CHECKS THE PC AND PROCESSOR STATUS WORD SAVED WHEN 

A KT ERROR OCCURS DURING THE at PUSH ON THE at DURING 
SERVICING OF A TIMEOUT ERROR. RING A ‘DOUBLE 

SEQUENCE SUCH AS THIS, THE PSW SAVED WILL BE THe ONE PICKED UP 
FROM VECTOR+2 (LOC. 6 IN THIS CASE) AFTER THE FIRST TRAP, 

NOT THE PSW PRESENT BEFORE THE FIRST TRAP. SRO AND SR2 


FEESEFS SEES 
CN WE wilt 


POA at Lt Et td tt 
Pawn 
wn—oo 


At 
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SHOULD RECORD THE KT ERROR ‘A R/O VIOLATION BY THE USER STACK PTR.) 


NOTE THAT THE PREVIOUS MODE BITS <15:12> OF THE PSW 
WILL BE SET IN THE PSW THAT IS SAVED. 


Ba 
Ooo 


WAAL ALAA ALA 


SQN 


035100 
000600 177046 


1POR4 RAP R EAD/WRITE 

sLOAD ADDRESS OF 4$ IN CPU (TIMEOUT) VECTOR 

sLOAD PSW THAT SHOULD BE PUT ON STACK IN VECTOR+2 
sLOAD ADDRESS OF 4$ IN A.M. TRAP VECTOR 

;LOAD A KERNEL PSW IN MMVEC+2 

;SET_LOOP yi: ERROR POINTER 10 2% 


G0 TO USER MODE 
:SET USER STACK PTR. SO SECOND PUSH IS IN PG. 3 
;CAUSE TIMEOUT ERROR THAT WILL CAUSE 

R/O ERROR WHEN TRY TO SAVE OLD PC 
000002 : fms R1 :Put PSW SAVED ON KERNEL STACK INTO R1 


(KSP), R3 
177572 001272 SRO,WASSRO “REA NTS . 

001274 SR2,WASSR2 :R CONTENT - STATUS REG. 2 
177572 #160000,SRO [CLEAR THE ERROR BITS nt SRO 

PSW ‘BE SURE IN KERNEL MODE 

#KERSTKKSP SRESTORE KERNEL STACK POINTER 
177776 #140000,PSw :GO TO USER MODE 

HUSESTK .USP ‘RESTORE USER STACK APOINTER 


SESSFERSE 


& 


Sete yey ge tye pete ye tpt ye pte ww 
“ 
-oo 


177776 


SCooooooocoeo 
ee ed ed ad at a 
MRR PEPRIPOPE PE POPE Pere 


Wa 
No NNN 


mu 
ANN 


00 
01 
01 
01 
01 
04 
00 
01 
01 
01 
00 
00 


VUVMIrnrnur 
—Ooorn~s 


STMPO 
170017 R1,#170017 


So 
So 


:PREVIOUS MODE BITS = 


031044 5$ ;BRANCH IF YES 
031046 001176 ;WRONG PSW SAVED DURING ‘DOUBLE ERROR"’ SEQUENCE 
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5$: R3 83844 sWAS THE PC AT ie pis OF THE TIMEOUT ERROR 
;SAVED ON THE STA 
+ BRAN CH IF YES 
STMPO WRONG PC SAVED DURING TRAP SEQUENCE 
020147 6$: WASSRO,#20147 01D SRO REPORT - USER, PAGE 3, R/O ABORT? 
7% ;BRANCH If YES 
STAPO :SRO OID NOT ox’ R/O ABORT 
030752 7$: WASSR2 #38 :D10_SR2 LOCK UP VIRTUAL ADDR. OF LAST 
s INSTRUCTION SUCCESSFULLY FETCHED? 
8$ ;BRANCH IF YES 
STMPO SR2 DID NOT LOCK UP ADDR. OF TIMEOUT INST. 
8$: STAPO ANY "ERRORS" DURING TRAP SEQUENCE? 
9$ ;BRANCH IF NO 
45 WRONG PC OR PSW WERE SAVED 
TOR SRO OR a, DID NOT REPORT R/O 
ZERROR DURING TIMEOUT - KT TRAP 


7$ 

sFOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
:"'BR sotaran 


031124 002076 000004 : #TIMERR 284 ; RESTORE ADDRES F NORMAL CPU TRAP HANDLER 
#340 ,a%6 ;RELOAD ERRVECS? vITH KERNEL PSW 
MAGMERR,@#250 ;RESTORE ADDRESS OF NORMAL A.M. TRAP HANDLER 
#77406,UI1PDR3 ;REMAP USER PAGE 3 READ/WRITE 
001110 #1$,SLPERR ;RESET LOOP ON ERROR POINTER TO 1$ 
031162 035134 JS PC, TON :TURN T-BIT TRAPPING BACK ON 


8 PER AAAEAAAEAAATATAAAAAEAAATAAAAAAAEAAAAAAAAAAAAAARAAARAAAAARAAAREEE 


$3 


ooooo oooooo 
WAAAS WIw 
ae ss se 
2a tt OOO 
& SF8 
ern 


FEFESE SES 
SSLESF 
NOFS 


— se a ee 


; THIS GROUP OF TESTS WILL TEST ALL THE LOGIC ASSOCIATED WITH 
THE "MOVE FROM PREVIOUS’ AND MOVE TO PREVIOUS*’ INSTRUCTIONS. 


; 
FUERA A AAT AAAE AAA AAAEAAA AAA AEA AEAAAA AA AAA AAAAAAAAAAAAAEAEAAEe 


N—OOBNOUVFSWN—O 


34 
34 
34 
34 
34 
34 
34 
34 


mrw 


FERRARA AAA A AEE AA AE AAT A AAA AAEEAEAAAAAAAAAAAAA HAART ATER ee 


:#TEST 43 MOVE FROM PREVIOUS (USER) I-SPACE 


THIS TEST USES THE ‘MFPI* INSTRUCTION TO ENSURE THAT THE 
PREVIOUS MODE IS CLOCKED CORRECTLY 
THERE 1S A DESCRIPTION BEFORE EACH DESTINATION MODE TESTED, 


Mwr 
oo 


SSELFUSSLSS 


IF THE CORRECT MODE (USER) 1S NOT ENABLED A NON-RESIDENT ABORT 
WILL OCCUR AND TRAP TO 23%, WHERE THE ERRORS ARE REPORTED. 


SEAR AAAAAAAAAAAAATAAAETAAAAAAAAAAAAAAARAAARAARAERAAAeAAeKees 


18143: 
sMAP KERNEL PAGE 0 TO 0-4K 
sMAP KERNEL PAGE 1 TO 4-8K 
;MAP KERNEL PAGE 2 T 
sMAP KERNEL PAGE 5 T - 
sMAP KERNEL PAGE 4 TO 12-16K 
;MAP KERNEL PAGE 7 TO THE 1/0 PAGE 
077406 #77406,R0 ;MAKE ALL KERNEL I]-SPACE fort RESIDENT 
;READ/WRITE, LENGTH 200 BLOCK 
000010 #10,R2 ;SET LOOP COUNTER TO 8 


Pag hee esereeeeee 


med ame Se Se Se Se Be Se Be Be Se Be 


172340 


FRFEESESES ES SESE 
oS 
Rhet 4 
eee 


ew 
m—Oo 
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172300 #KIPORO,R1 ;PUT ADDRESS OF FIRST POR IN RI 
28: RO, (R1)¢ [LOAD POR WITH 774 
R2,2$ [LOOP TO 2$ UNTIL ALL PDRS LOADED 
000010 #16,R2 [SET LOOP COUNTER T 
177600 #UIPDRO,R1 :PUT ADDRESS OF FIRST PDR IN RI 
RO, (R1)4 ; LOAD POR WITH 774 
UNTIL ALL pORS LOADED 


ee | 


Sins 
ooonm 
—PN — 


WWAWIw or 
SAN 


000000 
000200 
000400 


SEES ES EE YE 
SELEULLULLS 
ecoocesece 


NMMVNRN~ 


PAGE 3 TO 12-16K 

007600 I PAGE 7 TO THE 1/0 PAGE 

031332 #48, $LPE =SET LOOP ON ERROR TO 4$ 

077406 #77406 ,KIPDR4 : KERNEL I-SPACE PAGE 4 READ/WRITE 

000600 #600, KIPAR4 PAGE 4 TO 12k 

000600 #600 UIPARS 

036514 #36514 {LOAD DATA PATTERN INTO RO 

100000 RO 39160000 [LOAD DATA PATTERN INTO PHY 60000 

031766 #23$ , MPVEC >SET M.M. VECTOR TO 23$ 

172310 CLRB so KIPOR4 MAKE KERNEL I-SPACE PAGE 4 NON-RESIDENT 
;THE FOLLOWING WILL TEST “DSTM=0 MFPI 


031376 031404 0 #5$,SLPERR 7 SET _— ON ERROR POINTER TO 5$ 
031404 37 030340 : #030340,PSw :MAKE P REVIOUS MODE USER 
031412 : USP ;PUT USER STACK POINTER ON KERNEL 


: STACK 
031414 001100 #KERSTK ,KSP sWAS SOMETHING PUSHED ON STACK AT 6$ 


2 


rene 
mrrr 
SANS OS 
4Eess w 
NOoOnNN NS 


—-oCo7T0o0o 
ZVSNUNN 


wr 
on 


031364 
031372 
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3476 031420 001407 7$ sBRANCH IF NOTHING WAS PUSHED 
3477 031422 012600 (KSP)+,RO ;POP KERNEL STACK INTO RO 


3478 031424 012701 000700 MOV #USESTK,R1 EXPECTING TO GET 700 AS USP 





H 6 
MD-11-CJKDA-A F-11 MMU DIAG MACY11 30A(1052) 29-JAN-79 15:10 PAGE 72 
CJKDAA.P11 29-JAN-79 14:38 143 MOVE FROM PREVIOUS (USER) I-SPACE SEQ 0072 


031430 020001 RO.R1 :01b YOU GET THE RIGHT POINTER? 
031432 001403 8$ ;BRANCH IF YOU 01D 
031434 104046 46 WRONG THING WAS we ON STACK 
sFOR TIGHTER SCOPE L 
; REPLACE ERROR CALL vit 
:"BR 58°" = 000763 


8$ :BRANCH 10 NEXT TRY 

50 

: REPLACE ERROR CALL WITH 
R 5$" = 000761 


sTHE FOLLOWING WILL TEST ‘pstnet HEP. 
031454 001110 MOV #9%, SLPERR T LOOP ON ERROR POINTER T0 9$ 
#36516 RO RELOAD DATA PATTERN IN RO 
177776 9S: #030340, PSw [MAKE PREVIOUS MODE USER 
MO #100000.R2 LOAD VIRTUAL ADDRESS INTO R2 
(R2) = RE PHYSICAL 60000 


(KSP)+,R1 
RO,R1 ; HED SAME AS STORED 
10% :BRANCH IF CORRECT ot WAS FETCHED 


46 ;WRONG DATA WAS FETCHE 
:FOR TIGHTER SCOPE LOOP 


; REPLACE ERROR CALL WITH 
"BR 9$"" = 000766 


: THE FOLLOWING WILL TEST DSTM=2 nP. 

MOV LPERR :SET LOOP ON ERROR POINTER TO 118 
103080. PSW [MAKE PREVIOUS MODE USER 
#100000.R2 [LOAD VIRTUAL ADDRESS INTO R2 

R2)¢ = RE PHYSICAL 60000 


031506 


(KSP)+,R1 
RO,R1 ; FET AS STORED 
12$ ;BRANCH IF CORRECT ras WAS FETCHED 
104046 46 s;WRONG DATA WAS FETCH 

sFOR TIGHTER SCOPE LOOP 

; REPLACE ERROR CALL WITH 

‘BR 11$"° = 000766 
031532 ; ;THE FOLLOWING WILL TEST DSTM=3 MEPL. 
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CJKDAA.P11 29-JAN-79 14:38 143 MOVE FROM PREVIOUS (USER) I-SPACE SEQ 0073 
3516 031532 012737 031540 01110 MOV #13$,SLPERR sSE7 LOOP ON ERROR POINTER TO 13$ 
3517 031540 012737 030340 177776 13%: MOV #030840 ,PSu [MAKE PREVIOUS MODE USER 
3518 031546 006537 100000 MFP] a#100000 [READ FROM PHYSICAL $0000 
3519 031552 012601 MOV (KSP)+,R1 [POP KERNEL STACK INTO R1 
3520 031554 020001 CMP RO,R1 [WAS DATA FETCHED SAME AS STORED 
3521 031556 001401 BEQ 148 [BRANCH IF CORRECT DATA WAS FETCHED 
3522 031560 104046 ERROR 46 [WRONG DATA WAS FETCHED 
3523 [FOR TIGHTER SCOPE LOOP 


3524 ;REPLACE ERROR CALL WITH 
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:"BR 138° = 000767 
:THE FOLLOWING WILL TEST DSTM=4 MFPI. 
Ov #158, SLPERR :SET LOOP ON ERROR POINTER TO 15$ 
7030840. PSW [MAKE PREVIOUS MODE USE 
100002.R2 ;LOAD VIRTUAL ADDRESS INTO R2 
SICAL 60000 


Ww 
SIO Oo 
mn 


moo 


WAS DATA FETCHED SAME AS STORED 
sBRANCH IF CORRECT DATA WAS FETCHED 
WRONG DATA WAS FETCHED 

sFOR TIGHTER SCOPE LOOP 

;REPLACE ERROR CALL WITH 

:''BR 158" = 000766 


;THE FOLLOWING WILL TEST DSTM=5 MEPL. 


031622 001110 #17$,SLPERR iSE1 LOOP. ON ERROR POINTER TO 178 
177776 : #030340,PSW¥  ~ :MAKE PRE¥IOUS MODE U 
001202 #100000.$TMP2 *: Logg test LOC. VERT. ADDR INTO LOC. STMP2 
001204 #<STMP242>,R2  :LOMBPADDR. OF STMP242 INTO R2 
a-(R2) [READ FROM PHYSICAL 
(KSP)+,R1 [POP KERNEL STACK INTO R1 
RO,R1 [WAS DATA FETCHED SAME AS STORED 
BE 18$ SBRANCH IF CORRECT DATA WAS FETCHED 
031652 46 [WRONG DATA WAS FETCHED 
[FOR TIGHTER SCOPE LOOP 
:REPLACE. ERROR CALL WITH 
7$"* = 000763 


: ‘BR 
031654 : ;THE FOLLOWING WILL TEST DSTM=6 MFPI. 


031654 031662 #19$, SLPERR :SET LOOP ON ERROR POINTER TO 19S 
0 030340 : #030540, »PSW E DE USER 


100000 100000 (R2) 3 

(KSP)+,R1 ;POP KERNEL STACK INTO R1 
3WAS DATA FETCHED SAME AS STORED 
;BRANCH IF CORRECT DATA WAS FETCHED 
sWRONG DATA WAS ee 
sFOR TIGHTER SCOPE L 
;REPLACE ERROR CALL ITH 

‘BR 198" = 000766 
; THE FOLLOWING WILL TEST DSTM=7 MFP I. 


031714 #21$ SLPERR ;SET LOOP ON ERROR POINTER TO 21$ 
#030840,PS [MAKE PREVJOUS MODE USER 
#100000, STAP2 [LOAD TEST LOC. V.A. INTO S$TMP2 
v #STMP2,R2 [LOAD ADDRESS OF $TMP2 INTO R2 
000000 a0(R2) SUSE STMP2 , 10 FETCH VIRTUAL 


OF 6 
(KSP)+,R1 : POP INTO R1 
RO,R1 : FETCHED SAME AS STORED 
228 SBRANCH IF CORRECT DATA WAS FETCHED 
46 0 S FETCHED 


ooooooooo 


AAA 
vote 
WWAWAAA AAI 
a a a ee nt tt et et 
oo s 
a 
No 


:FOR T 
;REPLACE ERROR CALL WITH 
"BR 218"° = 000762 
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228: #AGMERR AAVEC 8 ;SE7 A.M. VECTOR TO NORMAL ROUTINE 
#1%,SLPERR ;SET LOOP POINTER TO START OF TEST 
TST44 ;;BRANCH TO NEXT TEST 


(KSP)+,TRAPPC ;SAVE PC & PS OF TRAP 
+ SAVE SRO FOR ERROR TYPEOUT 


BIC @ ; LEAVE 
032020 1 71 1ED TO READ NON-RESIDENT PAGE 
GHTER SCOPE LOOP 
;REP LACE ERROR CALL WITH 
“NOoP”* = 00 


7A 
032022 TRAPPS,-(KSP)  ;PUT PC t PS OF TRAP ON STACK 
032026 TRAPPC ,-(KSP) 
032032 00 02 


FA EAAAA EEE AAA EEE A ATTA AAA AAA AERA AAAAAAAARAAAAAAARERAAAATAEE 


2*TEST 4% MOVE TO PREVIOUS (USER) I-SPACE 


THIS TEST USES THE ‘MTP1" eter ay laa TO ENSURE THAT THE 
PREVIOUS MODE 1S CLOCKED CORRECT 
THERE 1S A DESCRIPTION BEFORE EACH DESTINATION MODE TESTED, 


IF THE CORRECT MODE IS NOT ENABLED A NON-RESIDENT ABORT 
WILL OCCUR AND TRAP TO 20$, WHERE THE ERRORS ARE REPORTED. 


SAKE KE TASK AAA AAAAAKATAAAAAAAAAAAAAAAAAAAARARAAAARAAEAAAARARAAEA 


sine SCOPE 
077406 #77406, KIPDR4  ;KERNEL I-SPACE PAGE 4 READ/WRITE 
077406 #77406,UI1PDR4  ;USER I-SPACE PAGE 4 READ/WRITE 
000600 #600 ,KIPAR4 ; 12 
000600 #600 ,UIPARS 
032646 MOV #208 ,MAVEC 7SET A.M. VECTOR TO 208 
: THE FOLLOWING WILL TEST DSTM=0 MTP] 


030340 : #030340,PSW sMAKE PREVIOUS MODE USER 
007777 #7777, -(KSP) PUSH DATA ON KERNEL STACK 
SP ;LOAD USER STACK POINTER 
;READ USER STACK POINTER 
:POP KERNEL STACK INTO R1 
007777 iWAS USER ee POINTER CHANGED 
BRANCH IF IT WAS 
sUSER STACK POINTER NOT CHANGED 
:FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
‘BR 2$" = 0007 


030340 177776 : #030340,PSw :MAKE PREVIOUS MODE USER 

000700 MUSESTK ,-(KSP) :GET READY TO RESTORE USER S. POINT 
] USP sRS STORE USER STACK POINTER 

; THIS wi Ls? 1" 


TPI. 
032156 001110 v SET LOOP ON ERROR POINTER TO 5$ 
100000 MOV 1106000" R2 ‘LOAD VIRTUAL ADDRESS INTO R2 


eB ame Se Ge Se Be Be Oe 
gee ees e0e 68 0 @' 


seveuuysssy 
SOON UNF WN—O 


PITTA TTT TT 
SELERFENS 


SSSSSS 
SRFUNYLSSS 





6 
MD-11-CJKDA-A F-11 MMU DIAG MACY11 30A(1052) noe ter eet 15:10 * paGE 76 
CJKDAA.P11 29-JAN-79 14:38 144 TO PREVIOUS (USER) I-SPACE 


3637 125252 #125252. ho :LOAD TEST DATA INTO RO 
3638 S$: MOV RO,-(KSP :PUSH TEST DATA ON KERNEL STACK 
3639 60 172310 KIPOR4 SMAKE KERNEL I PAGE 4 NON-RESIDENT 
3640 (R2) :LOAD TEST DATA INTO PHYSICAL 60000 
3641 000006 172310 #006 x1 POR MAKE KERNEL PAGE & RESIDENT 
3642 )-RI [READ FROM ADDRESS 60000 
3643 RO R ISEE IF DATA WAS STORED AT CORRECT PLACE 
3644 E 6 SBRANCH IF STORE WAS CORRECT 
3645 S INCORRECT STORE 
3646 [FOR TIGHTER SCOPE LOOP 
3647 ;REPLACE ERROR CALL witW 
3648 R 5$" = 000765. 

STHE FOLLOWING WILL TEST * pete? MTP. : 


9 
3650 : 
032230 #8%, SLPERR :SET LOOP ON ERROR POINTER TO 8$ 
#030340, PSW SMAKE PREVIOUS MODE USER 
5252.R [LOAD TEST DATA INTO RO 
[LOAD VIRTUAL ADDRESS INTO R2 
: [PUSH TEST DATA ON KERNEL STACK 
172310 “MAKE KERNEL PAGE 4 NON-RESIDENT 
(R [LOAD TEST DATA INTO PHYSICAL 60000 
000006 172310 1000 KIPOR4 SMAKE KERNEL PAGE 4 RESISENT 
100000 MOV 4100000, R1 [READ FROM ADDRESS 60000 
ROR [SEE IF DATA WAS STORED CORRECTLY 
E 9 ‘BRANCH IF STORE WAS CORRECT 
032256 47 : INCORRECT st ORE 
[FOR TIGHTER SCOPE LOOP 
; REPLACE ERROR CALL WITH 
:"BR BS" = 000764 


032260 : sTHIS WILL TEST DSTM = 3 MTPI. 
032300 MOV #108, SLPERR :SET LOOP ON ERROR POINTER TO 108 
030340 103080 P PSW [MAKE PREVIOUS MODE USER 
052525 #52525,RO [LOAD TEST DATA INTO RO 
: #0 [PUSH TEST DATA ON KERNEL STACK 
172310 [MAKE KERNEL 1 PAGE 4 NON-RESIDENT 
a#100000 ;LOAD TEST DATA INTO PHYSICAL 60000 
172310 #006 ,KIPDR4 IDEN 


100000 #100000, R1 REA ESS 60000 
032324 RO,R sSEE IF DATA WAS STORED CORRECTLY 











A 
MD-11-CJKDA-A F-11 MMU DIAG MACY11 30A(1052) 29-JAN-79 15:10 PAGE 77 
CJKDAA.P11 29-JAN-79 14:38 144 MOVE TO PREVIOUS (USER) I-SPACE SEQ 0077 


3676 BEQ 118 sBRANCH IF STORE WAS CORRECT 
3677 04047 ERROR 47 dogs STORE 
3678 sFOR TIGHTER SCOPE LOOP 
3679 ;REPLACE ERROR CALL WITH 
:“BR 108"° = 000765 
3681 : ;THIS WILL TEST DSTM = 4 MTPI. 
323 ROV #12$, SLPERR ;SET LOOP ON ERROR oe TO 12$ 
MAKE PREVIOUS MODE USER 
LOAD TEST DATA INTO RO 
RO,-(KSP) ;PUSH TEST DATA ON KERNEL STACK 
#160002 ,R2 LOAD VIRTUAL ADDRESS INTO R2 





6 
MD-11-CJKDA-A F-11 pire MACY11 30A(1052) 29-JAN-79 15:10 YPAGE 78 


CJKDAA.P11 29-JAN-79 14:38 144 MOVE TO PREVIOUS (USER) I-SPACE SEQ 0078 
7 Sais doce 105037 172310 CLRB = KIPOR4 MAKE KERNEL I PAGE 4 NON-RESIDENT 
MIP]  =(R2) [LOAD TEST DATA into PHYSICAL 60000 
11 onesies 000006 172310 MOVB #006, KIPOR4 ;MAKE KERNEL PAGE 4 RESIDENT 
3690 pasace 013701 100000 MOV a#100000,R1 FROM ADDRESS 60000 
3691 032400 020001 CMP RO,R1 2SEE IF DATA WAS STORED CORRECTLY 
92 032402 001401 BEQ 136 ‘BRANCH IF STORE WAS CORRECT 
93 032404 104047 ERROR 47 ZINCORRECT STORE 
94 TIGHTER SCOPE LOOP 
3695 . ;REPLACE ERROR CALL WITH 
3696 ye R 128"° = 000762 
3697 32406 ghee’ 7, VSS: THE FOLLOWING WILL TEST *DSTM=S RTPI. 
3699 632406 012737 032440 001110 hov #14$, SLPERR sSET LOOP ON ERROR POINTER TO 148 
00 032414 012737 030340 17777% MOV #030540, PSw [MAKE PREVIOUS MODE USER 
701 0324622 012700 052525 MOV #52525, RO [LOAD TEST DATA INTO-R RO 
3702 032426 012702 001204 MOV sestabbee> .R2 SLOAD ADDR. OF LOC. STMP2*2 INTO R2 
3703 032432 012737 100000 001202 MOV #100000,$TAP2  :LOAD VIRT. ADDR. OF TEST LOC. INTO STMP2 
3704 032660 010046. . 148: MOV RO,-(KSP) [PUSH TEST DATA On, KERNEL $ 
3705 O3aee2 105057 472310 CLRB 3s KI POR4 [MAKE KERNEL PAGE 4 RONCHESIDENT 
3706 032646 006652 7 MIP]  a-(R2) [LOAD TEST DATA Into PHYSICAL 60000 
3707 032450 112737 000006 172310 MOVB #006, KIPOR4 SMAKE KERNEL PAGE 4 RESIDENT 
708 032456 013701 100000. MOV a#100000,R1 [READ FROM ADDRESS 60000 
3709 032462 020001 x CMP RO,RI [SEE IF DATA WAS STORED CORRECTLY 
3710 032464 001401 BEQ 15$ SBRANCH IF STORE WAS CORRECT 
3711 032466 104047 ERROR 47 S INCORRECT STORE 
3712 [FOR TIGHTER SCOPE LOOP 
3713 ;REPLACE ERROR CALL WITH 
3714 R 148°" = 000764 
3715 032470 15$: ; THIS WILL TEST DST = 6° ‘niPL. 
3717 032670 012737 032512 001110 hov #168, SLPERR sSET LOOP ON ERROR POINTER TO 16$ 
3718 032476 012737 030340 177776 MOV #030340,PSW [MAKE PREVIOUS MODE USER 
3719 032506 012700 052525 MOV #52525, RO SLOAD TEST DATA INTO RO 
3720 032510 005002 CLR R2 MAKE REGISTER 2 ZERO 
3721 032512 010046 16$: MOV RO,-(KSP) :PUSH TEST DATA ON KERNEL STACK 
3722 032514 105037 172310 CLRB so K IPDRG SMAKE KERNEL | PAGE 4 NON-RESIDENT 
3723 032520 006662 100000 _ MTPL  100000¢R2) SLOAD TEST DATA Into PHYSICAL 60000 
3724 032526. 112737 000006 172310 MOVB #006, KIPDR4 MAKE KERNEL PAGE 4 RESIDENT 
3725 032532 013701 100000 MOV a#100000,R1 [READ FROM ADDRESS 60000 
3726 032536 020001 CMP RO,R1 SSEE IF DATA WAS STORED CORRECTLY 
3727 032540 001401 BEQ 178 SBRANCH IF STORE WAS CORRECT 
3728 032542 104047 ERROR 47 S INCORRECT STORE 
3729 [FOR TIGHTER SCOPE LOOP 
3730 , ;REPLACE ERROR CALL WITH 
3731 :"BR 168°" = 000763 
3732 032544 17: ; THE FOLLOWING WILL TEST ‘DSTM=? MIP. 
3734 032544 012737 032576 001110 hov #188, S$LPERR :SET LOOP ON ERROR POINTER TO 18% 
3735 032552 012737 030340 177776 MOV #030840,PSu “MAKE PREVIOUS MODE USER 
3736 032560 012700 125252 MOV #125252.R0 [LOAD TEST DATA INTO RO 
3737 032564 012737 100000 001202 MOV #100000,TMP2 SLOAD VIRT. ADDR. OF TEST LOCATION 
3738 INTO LOCATION STMP2 
3739 032572 012702 001202 MOV #STMP2,R2 SLOAD ADDRESS OF $TMP2 INTO R2 
3740 032576 01004 18$: MOV RO,-(KSP) “PUSH TEST DATA ON KERNEL STACK 
3741 032600 105037 172310 CLRB KIPDR4 : MAKE KERNEL PAGE 4 NON-RESIDE 
3742 032604 006672 000000 MTP]  aO(R2) ‘LOAD TEST DATA INTO PHYSICAL 80000 


8 7 
MO-11-CJKDA-A F-11 DIAG MACY11 30A(1052) 29-JAN-79 15:10 PAGE 79 
CJKDAA.P11 29-JAN-79 14:38 T44 MOVE TO PREVIOUS (USER) I-SPACE 


032610 7 000006 172310 #006 ,KIPORG sMAKE KERNEL PAGE 4 RESIDENT 
100000 - 4100000, RI *READ FROM ADDRESS 60000 
[SEE IF DATA WAS STORED CORRECTLY 
Fil ‘BRANCH IF STORE WAS CORRECT 
47 S INCORRECT STORE 
[FOR TIGHTER SCOPE LOOP 
SREPLACE ERROR CALL WITH 
"BR 18$"° = 000763 
032036 001110 19S: #1$, SLPERR [SET LOOP POINTER TO START OF TEST 
002150 000250 SMGMERR,MMVEC  :RESTORE M.M. VECTOR TO NORMAL ROUTINE 
TST45 :;BRANCH TO NEXT TEST 


(KSP)+,TRAPPC ;SAVE PC & PS OF TRAP 
(KSP)+. TRAPPS 
001272 SRO, WASSRO ;SAVE SRO FOR ERROR TYPEOUT 
001274 SR2,WASSR2 : SAVE 
160000 177572 #160000. SRO 


: REPLACE ERROR CALL WITH 
“NOP"* = 000240 

032702 001270 TRAPPS ,~(KSP) ‘Put PC t PS OF TRAP ON STACK 

032706 001266 TRAPPC ,~(KSP) 

032712 RETURN TO TEST 


FRRAAAAAEAATAAAAA ETAT EEE AAAA AEA AAAAAAAAAAAARAAAARAAAAARAAAAAREEe 


:eTEST 45 MOVE FROM PREVIOUS (KERNEL) I-SPACE TO USER MODE 


THIS TEST CHECKS THAT IF THE PREVIOUS MODE IS KERNEL THE 
FETCH IS FROM KERNEL SPACE. 
THERE 1S A DESCRIPTION BEFORE EACH DESTINATION MODE TESTED, 


If THE CORRECT MODE IS NOT ENABLED A NON-RESIDENT ABORT 
WILL OCCUR AND TRAP TO 21%, WHERE THE ERRORS ARE REPORTED. 


PITTI IIIT Titi iit iii i ii ii iii ii iitiiiiiiiiiiiiiiiiiiiiiiiis) 
077406 #77406 ,RO ;MAKE ALL_USER aoe ae PAGES RESIDENT 
LENGTH 200 BLOCKS 


sREAD/WRITE, 
000010 #10,R2 ;SET LOOP COUNTER. 
177600 LOAD ADDRESS OF FIRST PDR IN R1 
(R1) sLOAD POR WITH 77406 

R ; LOOP phe 8 USER PDRS LOADED 

032744 ;SET LOOP ON ERROR i 3$ 
:GO0 TO USER MODE FOR THIS TEST 

KERNEL I-SPACE PAGE 4 READ/WRITE 
;MAP KERNEL J PAGE 2. tae” 


=] 
S 
o 
* 
“ 
S 
= 


Pus: eeeeeenee 
ee 


—B ang Ge Se Se Se Fe Se Se Se Be Ge 


~ 
™“ 
So 
o 


™m 
wr 


TIMMNININ NOT 
ww 
wr 


: SER 1 PAGE 4 
SLOAD DATA PATTERN INTO RO 
‘LOAD DATA PATTERN INTO PHY 60000 
100000 MOV #160000,R2 “LOAD VIRTUAL ADDRESS INTO R2 
:THE FOLLOWING WILL TEST OSTM0 MFP] 


ee tS — 


Soooooooooeoo oo 


™ 
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033412 000250 h #218 ,MAVEC :SET MLM. VECTOR TO 218 
177610 ( UIPDRG : 1-SPACE PAGE 4 NON-RESIDENT 
140340 177776 ro #1403860.PSY 


KS 
000700 * anand 


(USP) + ,RO 
001100 #KERSTK,R1 TEXPECTING 1100 A 

RO,R1 01D YOU GET THE ARIGHT POINTER? 

6$ ;BRANCH IF YOU DID 

46 sWRONG THING WAS PUSHED ON STACK 
sFOR TIGHTER SCOPE LOOP 
: REPLACE ERROR CALL WITH 
:"'BR = 000766 


6$ ‘BRANCH 10 NEXT TRY 
50 sNOTHING PUSHED ON STACK 
sFOR TIGHTER SCOPE LOOP 
;REPL ACE ERROR CALL WITH 
4$"" = 000764 


STHE FOLLOWING WILL TEST DSTM=1 HEP. 
MOV #7$, SLPERR :SET LOOP ON ERROR POINTER TO 7$ 
7146360, PSw SMAKE PREVIOUS MODE KERNEL PRESENT USER 
#36514,RO [LOAD DATA EXPECTED INTO RO 

100000 #100000,R2 [LOAD VIRTUAL ADDRESS INTO R2 
(R2) SREAD FROM PHYSICAL 60000 
(USP)+,R1 :POP USER STACK INTO R1 
RO,R1 [WAS DATA FETCHED SAME AS STORED 
8% ; BRANCH IF CORRECT DATA WAS FETCHED 
46 WRONG DATA WAS FETCHED 

“FOR TIGHTER SCOPE LOOP 

;REPL ACE ERROR CALL WITH 

7$"' = 000764 


STHE FOLLOWING WILL TEST’ DSM=2 MEPI. 
033124 MOV #9$,SLPERR :SET LOOP ON ERROR POINTER TO 9$ 
140340 : Fie68c0" PSW ‘MAKE PREVIOUS MODE KERNEL PRESENT USER 
100000 #100000, R2 [LOAD VIRTUAL ADDRESS INTO R2 
[READ FROM PHYSICAL 60000 
[POP USER STACK INTO R1 
[WAS DATA FETCHED SAME AS STORED 
SBRANCH IF CORRECT DATA WAS FETCHED 
SWRONG DATA WAS FETCHED 
[FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
9 000766 


sTHE FOLLOWING WILL TEST (DSTAES MFP. 
033156 MOV #11$,SLPERR ;SET LOOP ON "ERR OR POINTER TO 118 
140340 : 4140800 PSwW MAKE tPREVIOUS MODE KERNEL PRESENT USER 
100000 Hi a#100006 [READ FROM PHYSICAL 60000 
(USP) +,R1 [POP USER STACK INTO R1 
RO,R1 ‘WAS DATA FETCHED SAME AS STORED 
\26 ‘BRANCH IF CORRECT DATA WAS FETCHED 


See 

moo 

RSl52 

Soe sodas 


eeeperasess 


Socoooooooooo 
ssgees 
2 


aed ad td od 
SOOCONOUSWN—O 


033066 


8 Se Ge Bo Sa Bo Se Ge So Oe So Oe be oe 


Mrmr 
~m 


:FO GH 0 
;REPLACE ERROR CALL WITH 
"BR 11$"* = 000767 
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CJKDAA.P11 9-J 9 14: 145 MOVE FROM PREVIOUS (KERNEL) I-SPACE TO USER MODE 


3855 12$: ;THE FOLLOWING WILL TEST DSiA=4 AFPI. 

3856 00 Rov #138 ,SLPERR sSET LOOP ON ERROR POINTER TO 138 

3857 138: ;MAKE PREVIOUS MODE wr PRESENT USER 
38 100002 100002 ;R2 ‘AD Hl ye INTO R2 


; STORED 
BRANCH IF CORRECT DATA WAS FETCHED 
sWRONG DATA WAS FETCHED 
sFOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
R 138" = 000766 


; THE FOLLOWING WILL TEST *DSTm=5 mFPI. 


033240 001110 #158, SLPERR ;SET LOOP ON ERROR POINTER TO 15$ 
177776 : #140340,Psu MAKE PREVIOUS MODE KERNEL PRESENT USER 
001202 #100000 ,$TMP2 ;LOAD TEST LOC. VIRT. ADDR ie LOC. STMP2 
001204 Vv #<STMP2+2>,R2 LOAD ADDRESS OF STMP2+2 INTO R2 
@-(R2) ;READ FROM PHYSICAL 60000 
(USP)+,R1 
RO,R1 3 SAME AS STORED 
16$ ;BRANCH IF CORRECT DATA FETCHED 
46 sWRONG DATA WAS FETCHED 
sFOR TIGHTER SCOPE LOOP 
;REPLACE, ERROR CALL WITH 
R 158" = 000765 
033272 : ;THE FOLLOWING WILL TEST ‘Sina MFPI. 


033272 033300 #17$,SLPERR :SET LOOP ON ERROR POINTER 10 178. 
033300 737 140340 : #140340,PSW ;MAKE PREVIOUS RODE KERNEL PRESENT USER 


R2 
100000 100000 (R2) 
(USP)+,R1 
RO,R1 
18$ 
033322 46 


033232 


oooo 
ed et ot 
mrnr 
VAAN 
MOW’Ww 


=e 
par 
™ 


Sts 


b+ 4 
™ 
on SS NNN 


033266 
033270 


2 
3 


; ED SAME AS STORED 
BRANCH IF CORRECT DATA FETCHED 
sWRONG DATA WAS FETCHED 
:FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 

R 178" = 000766 
033324 : + THE FOLLOWING WILL TEST ‘pS TR=? MFPI. 


033332 H198 SLPERR ;SET LOOP ON ERROR POINTER TO 198 
140340,PSW [MAKE PREVIOUS MODE KERNEL PRESENT USER 
#100000, STMP2 LOAD TEST IR INTO STMP2 
#STMP2,R2 *L INTO hee 
30(RD) 


002150 
000340 
032716 


(USP)+,R1 
0,R1 


46 


#AGMERR ,MMVEC 
#00340, PSw 
#18, SLPERR 


3 1 
WAS DATA FETCHED SAME AS STORED 


BRANCH IF CORRECT DATA FETCHED 


WRONG DATA WAS FETCHED 


sFOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
;'BR 198"* = 00076 
O NORMAL ROUTIN 
;G0_ BACK 
SET LOOP POINTER TO START OF T 





MD-11-CJKDA-A F-11 MAU 


CJKDAA.P11 

3911 033410 
912 

913 

3914 033412 
3915 033416 
3916 033422 
3917 033430 
3918 033436 
3919 033444 
3920 

3921 

3922 

3923 033446 
3924 033452 
3925 033456 
3926 

3927 

3928 

3929 

3930 

3931 

3932 

3935 
3934 

3935 033460 
3936 033462 
3937 033470 
3938 

3939 033472 
3940 033476 
3941 033500 
3942 033502 
39435 0355 
3944 033510 
3945 033512 
3946 

3947 

3948 

3949 033514 
3950 035516 
3951 

3952 

3953 

3954 033520 
3955 033526 
3956 033532 
3957 033534 
3958 033536 
3959 033540 
3960 033544 
5961 033546 
3962 

3963 

3964 

3965 033550 
3966 033554 


DIAG 


29-JAN-79 14:38 


104053 


000401 
104054 


104054 


012746 
106606 


030340 


001100 


000700 


033526 
007777 


007777 


000700 


MACY11 


001272 
001274 
177572 


177776 


001110 


30A(1052) 
145 


218: 


3 
ook tom he 15:10 PAGE 82 
MOVE FROM PREVIOUS (KERNEL) I-SPACE TO USER MODE 


TST46 


(KSP)+, TRAPPC 
(KSP)+, TRAPPS 
SRO. 
SR2 
a 


51 


TRAPPS ,~(KSP) 
TRAPPC ,~(KSP) 


; BRANCH TO NEXT TEXT 


sSAVE PC & PS OF TRAP 
sSAVE SRO FOR ERROR TYPEOUT 
7S 2 FOR 
ITS IN SRO 
; TO READ NON-RESIDENT PAGE 
FOR TIGHTER SCOPE LOOP 
; REPLACE Ennee CALL WITH 
zA "NOP" 0024 
PUT PC t PS OF TRAP ON STACK 


RETURN TO TEST 


FRRAAAAAA AEA AAR AAA EAA AAA ASAT A AAA RAARARAAAATAAAARAAARARAAERAAES 


#TEST 46 


THIS TEST CHECKS THAT SINCE THERE IS NO DISTINCTION 
BETWEEN INSTRUCTION AND DATA SPACE IN THE FONZ-11 
MFPD & MIPD SHOULD BE DECODED THE SAME AS MFP] & MIPI. 


146: 


;* 
ce 
:t 
°@ 
*® 
Ss 
$: 


i 
1 


2$: 


3$: 
4$: 


5$: 


SCOPE 
MO 


MOVE FROM/TO D-SPACE = 


#030340,PSu 
USP 

#KERSTK ,KSP 
2s 
(KSP)+,RO 
#USESTK,R1 
RO,R1 


3$ 
53 
3$ 
54 


#4$, SLPERR 
7777, -(KSP) 


#USESTK ,-(KSP) 
USP 


MOVE FROM/TO I-SPACE 


SREHHAAAAEAAAAAAAEKASAAAAAATAAAAAAAAAAAAARARAARAAAAAARAAAAARAARAARAEE 


sMAKE PREVIOUS MODE=USER, oe 
MFPD SHOULD ACT LIKE MFPI PUTTING 
USER STACK POINTER ON THE KERNEL STACK 
WAS SOMETHING PUSHED ON KERNEL STACK? 
sBRANCH IF NO 
;POP KERNEL STACK INTO RO 
EXPECTING TO GET 700 AS USP 
3010 GET RIGHT POINTER VALUE? 
:BRANCH IF YES 
;WRONG THING WAS PUSHED ON STACK 
:FOR TIGHTER SCOPE LOOP 
; REPLACE ERROR CALL WITH 
‘BR 1$"" = 000763 
; BRANCH 10 NEXT TRY 
;NOTHING PUSHED ON STACK 
sFOR TIGHTER SCOPE LOOP 
:REPLA CE ERROR CALL WITH 
"BR 18°" = 000761 
;SET LOOP “ON ERROR POINTER TO 4$ 
;PUSH DATA ON KERNEL 


3P CK INTO R1 

WAS USER STACK POINTER CHANGED? 
; BRANCH YES 
USER STACK POINTER NOT CHANGED 
:FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 

‘BR 4$"' = 000767 


:GET READY TO RESTORE USER STK. PTR. 
RESTORE USER STACK POINTER 


SEQ 0082 
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CJKDAA.P11 29-JAN-79 14:38 146 MOVE FROM/TO D-SPACE = MOVE FROM/TO I-SPACE 


033556 012737 033462 001110 MOV #1$,SLPERR ;SE7 LOOP POINTER TO START OF TEST 


FRRAAAARAAE SHEA AAA AAA EAA AAA TATRA AAA AAAAAAARARAAAAAAAAAAARES 


:#TEST 47 MOVE FROM PREVIOUS I=SPACE (PREVIOUS=CURRENT=KERNEL ) 


THIS TEST CHECKS THAT IF BOTH PREVIGUS AND CURRENT MODES 
ARE KERNEL, AND THE SOURCE MODE 1S 0, THE DESTINATION 
STACK IS NOT DECREMENTED BEFORE ACC 

"EPI KSP"’ SHOULD PUSH THE NON-DECREMENTED VALUE 

OF KSP (1100) ONTO THE STACK (AT LOC. 1076). 


RATE AEAAAAAAASATAAAAAEAAAAAAARAAAAAAAAARAAARAARAAARAAAAKAERAAATAAeeAAs 


18147: 
177776 aaPSw 3SET PREVIOUS = CURRENT = KERNEL 
001100 #STACK RO ;SETUP VALUE FOR STACK POINTER 
RO,KSP LOAD STACK POINTER 
KSP 3 THE VALUE ““STACK*’ vere rs BE PUSHED 


011601 (KSP) ,R1 
R1 


020001 RO, ; E 
;STACK POINTER PUSHED? 

001401 E 2$ BRANCH IF YES 

104046 46 ad ty FETCHED WRONG DATA 
sFOR TIGHTER SCOPE LOOP 
;REPL ACE ERROR CALL WITH 
:"BR 18°" = 0007 


005740 : -(RO) : SETUP EXPECTED STACK POINTER VALUE 
020600 KSP,RO S THE STACK POINTER DECREMENTED? 
001401 3$ ‘BRANCH IF YES 


pete: eounen. 


et mee Be Be Be Oe Be Oe 


104050 » $0 ;STACK NOT PUSHED BY THE MFP] 
:FOR TIGHTER SCOPE LOOP 
; REPLACE ERROR CALL WITH 
‘BR 1S" = 000762 

012706 001100 t #STACK ,KSP ; RESTORE STACK POINTER 


.SBITL eevee eraerereeereeeeeeeeereeer eee eeeeeeeene 
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CJKDAA.P11 29-JAN-79 14:38 eeereeeecerereeeeerererererererererererenerereeeeeneeeee 


033626 013746 000004 TIMOFF: MOV @#ERRVEC,-(SP) ;SAVE CONTENTS OF at & 

033632 012737 000004 MOV 91% ,Q#ERRVEC :SETU P IN CASE OF TIMEOUT 
005337 164000 DEC 24164000 ; TURN OFF TIMER ON MULTI-TESTER 
012637 000004 1$: MOV (SP)+ ,@#ERRVEC ‘RESTORE CONTENTS OF LOC 4 


-SBTTL END OF PASS ROUTINE 


peeeeererreereeerereeeerereeeeererereeeeeneeeeererenereeeereerese 

 FINCREMENT THE PASS NUMBER (SPASS) : 
s*TYPE "END OF PASS #XXXxX TOTAL NUMBER OF ERRORS SINCE LAST REPORT rvrvy' 
a XXXX AND YYYY ARE DECIMAL NUMBERS 

s*1F SWi2=1 INHIBIT TRACE T 

a THERES A MONITOR GO 10. ti 

;*1F THERE ISN'T JUMP TO LOOP 


SEOP: 


001102 STSTNA :;ZERO THE TEST NUMBER 
STIMES :;ZERO THE NUMBER OF ITERATIONS 
SPASS :; INCREMENT THE PASS NUMBER 
100000 001234 + 5 + apathy ;;DON'T ALLOW A NEG. NUMBER 
+ . 


DE 
SEOPCT: . 
) 


;;LOOP? 


1 
SDOAGN 77 YES 
0 (PC)+,a(PC)+ 37;RESTORE COUNTER 
SENDCT: : 1 


033716 ot 22 TYPE ASCIZ STRING 
BR ;GET OVER THE ASCIZ 
047105 020104 65$: " Bh o><1S0/EM PASS #/ 
051523 021440 
033732 000 
033734 EVEN 


033734 64$: 
033734 013746 001234 SPASS,-(SP) oe ie SPASS FOR TYPEOUT 
ag PASS NUMBER 
033740 104405 360 TY Tey ASCIZ WITH SIGN 
033750 beh I STRING 


BR 6 3G IZ 
047524 040524 : . / ; TOTAL ERRORS SINCE LAST REPORT / 
047522 
047111 
051501 
047520 
052122 000040 


013746 001112 SERTTIL,-(SP) try SERTTL FOR pee 
a NUMBER OF ERRORS 
104405 TYPE=-DECIMAL ASCII] WITH SIGN 
001225 sitet CARRIAGE _ LINE FEED 
001112 C $ ;:CLEAR ERROR TOTA 
000042 $GET42: ;;GET MONITOR ADDRESS 
BE Bre’ IF NO MONITOR 
-(SP) ;; INSURE THE ‘'T’’ BIT IS CLEAR 
012746 034046 WSCLR.T.-(SP)  ;;SETUP FOR AN RTI OR RTT 
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4063 034044 000426 SRTRN ;G0 DO AN RTI OR RTT 9 LOAD THE PSW 
4064 SIWITH A CLEARED ‘T’’ BIT 
SCLR.T: = 


0442 ,RO + 2 INSURE ~4 CONTAINS THE MONITORS 
SDOAGN DRESS 


ae, . 
SENDAD: JSR PC, (RO) 
: NO 


SDOAGN: 
T 3 PUSH .~ PSw AND PC ON STACK 
000020 #20,(SP) 7: CLEAR THE ‘‘T’’ BIT 
010000 145036 sees ee + sRUN Pe TRACE TRAP? 


:BR IF NO 
034130 $TB1T 3318 IT TIME FOR TRACE TRAP 
1$ IF NO 


000020 #20, (SP) [:SET TRACE TRAP 


052716 
034536 012746 OF) 24 1$: #$LOOP ,-(SP) :; JUMP TO START OF TEST 
034 : eee a 1S CHANGED 10 
"RIT IF "RTT 1S A LEGAL 
: INSTRUCTION 


034124 =e : 
034124 000137 J a(PC)+¢ 7 ;RETURN 


034126 020462... : RESTRT 
034130 000 : 0 33°'T'’ BIT STATE INDICATOR 
: 034132 030136 ( SENULL: -1,°1,0 :;NULL CHARACTER STRING 


EVEN 
» OU e= > 2S a ©. SBTTL SCOPE HANDLER ROUTINE 
SSE ES aE tae On. “ 


4 FRRAAAAAESHAAAA AAAS AA TARE AAA ETAL A AAAAAA AAA AHERAATAAAAAAKAAAKAEe 


:*THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
;*AND LOAD THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG. (DISPLAY<7:0>) 
7*AND LOAD THE ERROR FLAG (SERFLG) INTO DISPLAY<15:08> 
3 * THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 
> *SW14=1 LOOP ON TEST 

ty? ITERATIONS 

LOOP ON ERROR 
LOOP ON TEST IN SWR<7:0> 


3; SCOPE=10T 


_- $SCOPE: 
104410 CKSWR :TEST FOR CHANGE IN sOFT- SwR 
032777 040000 144772 1S: BIT #B1T14,aSWR ::LOOP_ON PRESENT TEST 
001114 BNE SOVER YES IF SwWi4=1 
ee :WHAHASTART OF CODE FOR THE XOR Testensaase 
000418 $xTSTR: BR 6$ s1F RUNNING ON THE “xOR TESTER CHANGE 
SE THIS INSTRUCTION TO A "'NOP'' (NOP=240) 
2 013746 000004 QERRVEC,-(SP) ::SAVE .THE CONTENTS OF THE ERROR VECTOR 
, 034176 000004 #5$, APERRVEC i186 FOR TIMEOUT 
177060 a#177060 TIME OUT ON XOR? 
000004 (SP)+, @#ERRVEC 3 ;RESTORE THE ERROR VECTOR 
a 8 $SVLAD GO TO THE NEXT TEST 
“022626 (SP)+, (SP)¢ “ICLEAR THE STACK AFTER A TIME OUT 





aah F-11 MAU 
SO-JANCTS ie: 38 


w 

~ 
SS 
RNG 


SASNSSSnSu S 


52 
1 
1 
1 


000004 


000400 
144716 
001103 
001115 
001000 
001110 


001103 
001212 


004000 
001234 


001104 
001212 


MACY11 30A(1052) 


144724 
001102 


001103 
144666 
001106 


144634 


001104 


001104 
001212 


001232 


BR 
6%: ;##ANHEND OF 
BIT 
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(SP)+ ,@#ERRVEC 
7$ 


: >RESTORE THE ERROR VECTOR 
ON THE PRESENT TEST 


LOOP 
CODE oy XOR TESTERSSAAS 


celles 6M 

@SUR ,STSTNA 
SOVER 

_ 
ccna 
#B1T09 ,aswR 
SLPERR ,SLPADR 
SOVER 


SERFLG 
STIMES 


1$ 
#B1T11,aSWR 
1$ 


SPASS 
1$ 


SICNT 

STIMES ,SICNT 
SOVER 
#1,S1CNT 
SAXCNT ,STIMES 
STSTNM 
STSTNM,STESTN 


(SP) ,SLPADR 
(SP) ,SLPERR 


::LOOP ON SPEC. TEST? 
3I0N THe RIGHT TEST? 


7 HAS AN. ERROR OCCURRED? 

ST RAX. ERRORS FOR THIS TEST OCCURRED? 
‘LOOP ON ERROR? 

TISET LOOP ADDRESS TO LAST SCOPE 


3;ZERO THE ERROR FLAG 
;;CLEAR THE NUMBER OF be eae TO MAKE 
3;ESCAPE TO THE NEXT TEST 
fe ae ITERATIONS? 
:BR IF YES 
IF FIRST PASS OF PROGRAM 
INHIBIT ITERATIONS 
::INCREMENT ITERATION COUNT 
+s CHECK THE NUMBER OF ITERATIONS MADE 
:BR IF MORE ITERATION REQUIRED 
3 :REINITIALIZE THE ITERATION COUNTER 
NUMBER OF ITERATIONS TO DO 


T NUMBERS 
33 NUMBER IN APT MAILBOX 
SAVE SCOPE LOOP ADDRESS 
::SAVE ERROR LOOP ADDRESS 


SWR<7:0> 


002 
0 
0 
1 
1 
0 
0 


SESCAPE ;:;CLEAR THE ESCAPE FROM ERROR ADDRESS 
001115 MO #1, SERMAX ;;ONLY ALLOW ONE(1) ERROR ON NEXT TEST 
144534 SOVER: STSTNM,Q@DISPLAY ;;DISPLAY TEST NUMBER 
SLPADR, (SP) : sFUDGE RETURN ADDRESS 
RTI 414 XES PS 
SMXCNT: 200 MAX. NUMBER OF ITERATIONS 
-SBTTL ERROR HANDLER ROUTINE 


peeeeeeeeereeererereererereereeeeeeeeeeeeeeeeeereneeeeeeeeeeeeese 
*THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
;*SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL 
[*AND GO TO ERRTYP ON ERROR 
3 THE SWITCH OPTIONS FROVIDED BY THIS ROUTINE ARE: 
;*S$W15=1 HALT ON ERROR 
INHIBIT ERROR TYPEOUTS 
BELL ON ERROR 
LOOP ON ERROR 


N ;:ERROR=EMT AND N=ERROR ITEM NUMBER 


so°l=s 


SERROR: 


001162 RO, $REGO 
424 001164 R1,$REG1 
034430 001166 R2,$REG2 


7; TEST FOR CHANGE IN SOFT-SwR 
SAVE THE CONTENTS OF RO 
SAVE THE CONTENTS OF R1 

SAVE THE CONTENTS OF R2 





SSS SS SSSSS Fe 
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R3,SREGS sSAVE THE CONTENTS OF R3 


ja 

= 
‘ 

~o 


——-0O00 ef 
On2 SS 
+4 


, SREG 
001262 $TSTNM, TESTNO 
: SERFLG 


3 ¢SET THE ERROR FLAG 
7$ ;DON'T LET THE FLAG GO TO ZERO 
144450 STSTNM,@DISPLAY ;:DISPLAY TEST NUMBER AND ERROR FLAG 
#B1T10,aSuR > BELL ON ERROR? 
1$ :NO = SKIP 
, SBELL 3 RING BELL 
SERTIL ; COUNT THE NUMBER OF ERRORS 
Lyte, ::GET ADDRESS OF ERROR INSTRUCTION 


#2, SERRPC 

@SERRPC,SITEMB ;;STRIP AND SAVE THE ERROR ITEM CODE 
#B1T13,aSuR 23 SKIP TYPEOUT IF SET 

208 ;SKIP_ TYPEOUTS 

ate tae ;:G0 TO USER ERROR ROUTINE 
L 


a ee ee 
o oonrnNsy oo 
—ey WwNSNO 


SSa=e2SSSE28S 
NNN NY SSS 


—_ 
nn & 


#APTENV,SENV ::UMMING IN APT MODE 
NO,SKIP APT ERROR REPORT 
SITEMB,21% ::SET ITEM NUMBER AS ERROR NUMBER 
037206 Beas ; REPORT FATAL ERROR TO APT 


=8 


33 APT ERROR LOOP 
144334 $$: ; 


;;HALT ON 
sites} FOR CHANGE IN SOFT-SWR 
001000 144320. 3$: T +1 (ates ya em SWITCH SET? 


4 
001110 SLPERR, (SP) $ FUDGE RETURN FOR LOOPING 
001214 4$: teat te FOR AN ESCAPE ADDRESS 


BR IF NONE 
001214 a SESCAPE,(SP) =: FUDGE RETURN ADDRESS FOR ESCAPE 
022737 034056 000042 WSENDAD,@#42  —-; ;ACT=11 AUTO-ACCEPT? 
001001 6$ ::BRANCH IF NO 
000000 : YES 
034652 6$: | 
034652 000002 RTI : RETURN | 
SBTTL ERROR MESSAGE TYPEOUT ROUTINE j 


seeeeeeeerereeeeererreeeererereeeeereeeeeeeeeeeeneeeeeeeeeee eee 
STHIS ROUTINE USES THE ‘ITEM CONTROL BYTE’ (SITEMB) TO DETERMINE WHICH 
ERROR IS TO BE REPORTED. JT THEN OBTAINS, FROM THE ‘ERROR TABLE’ (SERRTB), 
: AND REPORTS THE APPROPRIATE INFORMATION CONCERNING THE ERROR. 


‘THIS, ROUTINE PROVIDES, AN AUTOMATIC "CARRIAGE RETURN-LINE FEED" 
TWO SPACES ARE TYPED AFTER EACH NUMBER FOR ‘'DT"’ 


FOR SITEMB=0, JUST THE ERROR PC IS TYPED 
THE AVAILABLE FORMATS FOR TYPING DATA ARE: 
OF FORMAT 
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0 TYPE A 6 DIGIT OCTAL NUMBER (FROM 16-BIT BINARY) 
! TYPE A MAL _NUMBER WITHOUT LEADING ZEROS 
3 


E it BINARY NUMBER 
TYPE A 6 DIGIT OCTAL NUMBER (FROM 18-B1T BINARY) 


ERRTYP: 
001223 Y , SCRLF s"CARRIAGE RETURN’’ & “LINE FEED" 
RO,-(SP) 3 SAVE 
R sPICKUP THE ITEM INDEX 
001114 proriere te 


cIF ITEM NUMBER IS ZERO, JUST 
:TYPE THE PC OF THE ERROR 
001116 SERRPC ,-(SP) ::SAVE SERRPC FOR TYPEOUT 
+ sERROR ADDRESS 
GO TYPE--OCTAL ASCII(ALL DIGITS) 


‘éeT OUT 
;ADJUST THE INDEX SO THAT IT WILL 
: WORK FOR THE ERROR TABLE 


RO 
001316 #SERRTB RO sFORM TABLE POINTER 
034726 (RO)+,2% PICKUP "ERROR MESSAGE" POINTER 
3$ ; NO POINTER 


:TY MES 
2s: ° 0 ;“ERROR MESSAGE POINTER wnt HERE 
001223 » SCRLF “CARRIAGE RETURN’ & "LINE FEED" 
034744 3$: (RO)+,4$ ;PICKUP “DATA HEADER’ POINTER 
5$ SKIP TYPEOUT IF 0 
:TYPE THE "DATA HEADER" 

4$: ° 0 :“DATA HEADER POINTER GOES HERE 

001225 eSCRL CARRIAGE RETURN’ & “LINE FEED" 


5$: sSAVE R 
: PICKUP “DATA TABLE'’ POINTER 
F NO DATA TO BE TYPED 
PICKUP “DATA FORMAT’ POINTER 
6$: RO 31S 17 FORMAT 0? 
$ ‘BR IF NO 


s*THIS CODE 1S FOR OCTAL (16-BI1T) FORMAT (DF=0) 
ae a(R1)+,-(SP) 3;SAVE @(R1)+ FOR TYPEOUT 
3:GO0 TYPE--OCTAL ASCII(ALL DIGITS) 


oo=— 
= 


So°l8 


TYPOC 
BR 11$ 


- THIS CODE 1S FOR DECIMAL FORMAT (DF=1) 
000001 7$« MPB ss (RO) , #1 s1$ 1T FORMAT 12? 
“. BN E 8$ [BRANCH IF NO 
? MOV @(R1)+,-(SP) :;SAVE @(R1)+ FOR TYPEOUT 
TYPOS Be °:G0 TYPE==DECIMAL ASCII WITH SIGN 


-*THIS CODE 1S FOR BINARY FORMAT (DF=2) 
000002 BS: CAPB (RO) ,#2 :1S8 17 FORMAT 2? 


N ;BRANCH IF NO 
MOV a(R1)+,-(SP) 7;SAVE a(R1)+ FOR TYPEOUT 
TYPBN 3:60 TYPE--BINARY ASCI] 
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035022 BR 118 


: *THIS cope 1S FOR OCTAL (18-B1T) FORMAT (DF=3) 
035024 9s: (R1)4+,-(SP) spur ADDRESS OF FIRST LOC. ON STACK 
0 040260 PC ,$DB20 ONVERT TWO LOCS. TO AN ASCII STRING 
000005 5. (SP + ay Y NEED 6 CHARACTERS NOT 11 
035044 MO +, 108 ‘PUT ADDRESS OF ASCII CHARS. AT 10S 
[TYPE OCTAL VALUE OF 18-B1T BINARY NO. 


71S os ANOTHER NUMBER? 


;BR IF 
035074 : TYPE 1012) SPACES 
:POINT TO NEW "DATA FORMAT’ 


(SP)+,R1 sRESTORE RI 
: : : Vv (SP)+,RO ;RESTORE RO 
001223 - SCRLF c""CARRIAGE RETURN’ & “LINE FEED" 
000207 ei RTS PC ; RETURN 
035074 000 ih Ree ;TwO(2) SPACES 
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4310 -SBTTL eee SUBROUTINES USED BY THIS PROGRAM ‘*#ee# 
» SBTTL TURN OFF T-BIT AND SAVE CURRENT PSW 


seererereaterrrererererererereereerereeeaekeaekeeeeeeeeaeeereeeeee 


THIS SUBROUTINE IS USED TO TURN OFF THE TRACE TRAP BIT IN THE PSw 
If IT . ON. THE PROCESSOR STATUS 1S SAVED IN ‘‘TBITPS** SO THAT 
THE PSW CAN BE RESTORED TO ITS PREVIOUS CONDITION WHEN CONDITIONS 
WARRANT T-BIT TRAPPING. 


SRE AAAAAASKAAAAAAAAAAAAKATAAAAAAAAAAAAAARARAAAAAARAAAAAAAAE 


033727 177776 000020 FF: T PSW,#TBIT 31S THE T-BIT SET IN THE PSW? 
001411 1$ EXIT IF NO 


IT 

013746 177776 PSW,-(SP) PUSH PRESENT PSW ON THE STACK 
011637 001276 (SP), TBITPS sALSO SAVE IT_IN "TBITPS’* FOR 

sRESTORING LATER 
042716 000020 #TBIT, (SP) CLEAR THE T-Bi1 (BIT 4) a THE PSW 
012746 035132 #1$,-(SP) :PUSH PC OF “RTS** ON STAC 
000006 RETURN’ TO 1$ WITH B11 OF F 
000207 1$: PC RETURN TO PROGRAM 


-SBTTL TURN ON T-BIT AND RESTORE PREVIOUS PSW 


SRAERAAAAAEAAAAAAAAAAAAAAAAEAAAAAARAARARAAAAARKAAARARAEARARAAARARARAAAAE 


#7 

;* THIS SUBROUTINE IS USED TO RESTORE THE PROCESSOR STATUS TO ITS 
;* PREVIOUS CONDITION BY RESTORING THE ‘‘T-BIT PSwW'* SAVED BY THE 
;* *“*TOFF’* SUBROUTINE IN THE ‘‘TBITPS*’ LOCATION. 
-* 
0 


seeeeeeererrereererereeeeeeeeeesereterenenteeeeeeeeeeeeeeeeeeees 
033727 001276 000020 N: a achat sung Fog on IN THE PREVIOUS PSW? 
001276 TBITPS,-(SP) PUSH PREVIOUS PSW ON THE STACK 
000340 001276 #340, 1BI1PS ;RESET THE “TBITPS"’ cil 
035164 MOV #1$,-(SP) sPUSH PC OF “'RTS'’ ON STA 
;"RETURN'’ TO 1$ WITH Bit RESTORED 
1$: PC ;RETURN TO PROGRAM 


- SBTTL SET ALL WRITEABLE BITS IN ALL PAR/PDR'S 


REARS AAAEAAAAA AAA AAAAAAAAAATAAAATAARAARAARAARARARAAAARAAEAAAHe 


i 


41 
hd THIS SUBROUTINE IS USED BY THE PAR/PDR DUAL te he TEST 
:* TO SET ALL WRITEABLE BITS IN ALL KERNEL AND USE PA AR'S AND 

:* POR'S TO A 1. THE “INITIAL STATE’ OF HAVING ALL BITS=1 IS 
:* USED TO SEE THAT ONLY ONE REGISTER 1S CLEARED IN RESPONSE 10 
se A SINGLE PAR OR PDR ADDRESS. 

:* 


SRERAEEAAAA HAASE AAAAE HEA A AEA AAAAAAAA AH AAAAAARARAKeRAKAAKAKKAAKe Ae 


SETREG: MOV #10,R2 :LOAD LOOP COUNTER WITH AN 8 
MOV #KIPDRO,R1 SLOAD ADDRESS OF FIRST POR INTO R1 

1$: #-1, (R134 :SET B11 IN KERNEL POR T 
R2,1$ SLOOP TO 1$ UNTIL ALL KERNEL PDR'S LOADED |. 
#16,R2 SLOAD LOOP COUNTER WITH 
#KIPARO,R1 ‘LOAD ADDRESS OF FIRST ph INTO RI 

2$: MO #-1, (R1S+ ?SET BITS IN A KERNEL PAR TO 1 
R2,0$ ‘LOOP TO 2$ UNTIL ALL ORNEL PAR'S LOADED 


Soooooooo 
AALAND 
PPP 
RISERS Ns 
Cooooooo°o 
Ww =n = 
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4366 935222 012702 000010 MOV #10,R2 ;LOAD LOOP COUNTER WITH AN 8 
4367 035226 012701 177600 MOV SUIPDRO,R1 LOAD ADDRESS OF Hed a’ te INTO Q1 
4368 035232 012721 (177777 3s: MOV 8-1, (R154 [SET BITS IN A USER 
4369 035236 077203 S08 R2, $$ ‘LOOP TO 3$ UNTIL mi USER PDR'S LOADED 
4370 035240 012702 000010 MOV #16,R2 ‘LOAD LOOP COUNTER WITH AN 8 
4371 035244 012701 177640 MOV SULPARO, R1 [LOAD ADDRESS OF FIRST NPAR INTO R1 
4372 035250 012721 177777 4$: MOV #-1, (R154 [SET BITS IN A USER PAR TO 1 
4373 035254 077203 $0B R2,48 LOOP TO 4$ UNTIL ALL USER PAR'S LOADED 
437% 035256 000207 RTS PC SRETURN TO TEST 
4376 -SBTTL READ & COMPARE KERNEL & USER PAR/PDR'S 
4377 4 s *#renreeeeereaerererta2a2aearzersa2ereraere2rceareara2raenagrerkaanzanrarenaearera2reee 
4378 ie » 
4379 3 THIS SUBROUTINE 1S USED BY PAR/PDR DUAL ADDRESSING TEST TO 
4380 ;* READ ALL THE PAR'S AND POR’S TO SEE THAT ONLY ONE REGISTER 
4381 :e WAS CLEARED IN RESPONSE TO A SINGLE PAR OR PDR ADDRESS. 
4382 ;* ANY FAILURES FOUND BY THE PAR/PDR DUAL ADDRESSING TEST WILL 
6383 :* BE REPORTED BY THIS SUBROUTINE. 
® 
6385 MIIIITI II iiiiitiiititiiiiiiiiiiiiiiiiiiiiiiit iii iti ii iii it 
4386 035260 CMPREG: or 
4387 . 035260 012701 172300 MOV #K1PORO,R1 SLOAD ADDRESS OF FIRST KERNEL PDR IN R1 f 
035264 012704 000010 MOV #10,R4 [LOAD LOOP COUNTER WITH AN & 9 
4389 035270 012705 077416 MOV #77616, R5 [PUT EXPECTED PDR CONTENTS IN RS 
4390 035274 021105 1$: CMP (R1), Rr5 sARE ALL WRITEABLE BITS SET AS EXPECTED? 
4391 035276 001404 BEQ 28 ‘BRANCH IF YES ¢ 
4392 035300 020100 CMP R1,R0 WAS 1T THE REG. THAT WAS CLEARED? 
4393 035302 001402 BEQ 2s sBRANCH IF YES 
4394 035 011102 MOV (R1),R2 sSAVE CONTENTS OF IMPROPERLY CLEARED REGISTER. 
4395 035306 104016 ERROR 16 3A POR WAS CFFECTED BY CLEARING A DIFFERENT. RAR/POR 
439% [FOR TIGHTER SCOPE LOOP 
4397 ZREPLACE ERROR CALL WITH £ e 
4398 SAN "RTS PC’ = 000207 StS 
4399 035310 062701 000002 2s: ADD #2.R1 :FORR NEXT ADDRESS Me ot Lae 
46400 035314 077411 $0B R4,18 P TO 1$ UNTIL ALL KERNEL POR'S ears . ed” ec 
4401 035316 012701 172340 MOV #KIPARO,R1 SLOAD ADDRESS OF FIRST KERNEL PAR DN | foe 
4402 035322 012704 000010 MOV #10,R4 [LOAD LOOP COUNTER WITH AN 8 Pa 8 
4403 035326 012705 177777 MOV #177777 ,RS [PUT EXPECTED PAR CONTENTS IN RS 5 oa ety to Se 
035332 021105 3$: CMP (R1),R5 ARE ALL WRITEABLE BITS SET AS RP APECTED? 2 iS ee 
4405 035334 001404 BEQ 4$ SBRANCH IF Stites 
4406 035336 020100 CMP R1,RO [WAS IT THE ines. THAT WAS CLEARED? ee BE 
4407 035340. 001402 BEQ 4$ SBRANCH IF Se Zaps 
4408 035342: 011102 MOV (R1),R2 37 SAVE CONTENTS OF IMPROPERLY CLEARED REGISTER” >. 
4609 035344 104016 ERROR ...16 > ER-PAR WAS EFFECTED BY CLEARING A DIFFENENT .PAR AaMEOR ; 
4410 <r * SFOR TIGHTER SCi Pe LOOP Ap hn SENT So: 
4411 ; a CPE 5. SREPLACE 08 tO . Ute os “Ss eh ay 
6412 wd ot ae incest BES BE 0207 - tee Ae fas 
tela 038389 OFfalL as fo Se SE ati scenna. PARYS-EHECKED So eR 
4415 035354 012701 177600 MOV #u gad, ‘TOD ADDh oil “OF HAAS guSER AR I Se dey 
4416 035360 012704 000010 MOV 410 ma LOAD L AN § oe ee eae 
4417 035364 012705 077416 MOV #7740, 25. :PUT ekpecTen Bk conten 1s. IN RS 
4418 035370 021105 5$: CMP (RIVRS~ 2 SARE ALL WRUTEABLE BITS SET AS EXPECTED? /, 
4419 035372 001404 BEQ +. a BRANCH IF YES 
4420 035374 020100 CMP R1,RO oo 4 WAS IT THE, REG. THAT WAS- CLEARED? 
4421 035376 001402 BEQ 6$ re _ FBRANC IF F ves SF ‘ 


ee ei SBR “s ieee, A a 
. 3 a 4 > 
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035400 011102 MOV (R1) ,R2 Aw CONTENTS OF JMPROPERLY CLEARED REGISTER 
035402 104016 ERROR 16 A POR WAS EFFECTED BY CLEARING A DIFFERENT PAR/POR 
; TIGHTER SCOPE LOOP 


000002 : #2,R1 
R4,5$ ; LOOP 5$ UNTIL ALL USER POR'S CHECKED 
177640 suiPARO, R1 LOAD ADDRESS OF FIRST a PAR IN RI 
000010 #10 ;LOAD LOOP COUNTER WITH AN 8 
177777 sf TT7, R5 :PUT EXPECTED PAR CONTENTS IN RS 
(R1),R5 ARE ALL WRITEABLE BITS SET AS EXPECTED? 
$ BRANCH IF YES 
R1,R0 [WAS IT THE REG. THAT WAS CLEARED? 
8$ sBRANCH IF YES 
(R1),R2 sSAVE CONTENTS OF JMPROPERLY CLEARED REGISTER 
16 sA PAR WAS EFFECTED BY CLEARING A DIFFERENT PAR/POR 
sFOR TIGHTER SCOPE LOOP 
; REPLACE ERROR CALL WITH 
sAN "RTS PC'’ = 000207 


035442 000002 8$: #2,R1 ooo re ADDR ESS 
035446 R4,7$ ;LOOP TO 7$ UNTIL ALL USER PAR'S CHECKED 
035450 0 PC RETURN. TO TEST 


-SBTTL CONVERT VIRTUAL ADDRESS TO PHYSICAL ADDRESS 


RHAAAAAATAATEAAAAAAAAAAAAEAAAAAAAKAAAAARAAAAAAARAAAARAARARAAARAAREAE 


THIS SUBROUTINE 1S USED TO FORM AN 18-B1T PHYSICAL ADDRESS 

(PBA) FROM THE 16-BIT VIRTUAL ADDRESS (VBA) AND THE APPROPRIATE 
PAGE ADDRESS REGISTER (PAR). THE SAME METHOD USED BY THE MEMORY 
MANAGEMENT LOGIC IS USED. VBA <15:13> SELECTS WHICH PAR/PDR 

1S TO BE USED, = 2 0>+PBA <5:0>, AND VBA : 

TO PAR <li: 00> TO GIVE PBA <17: 6>.. 

PHYSICAL ADDRESS. ARE LEFT IN LOC. 

ARE LEFT IN LOC. ‘‘PBALO’’. THE PS u's **CURRENT 

ARE USED TO SELECT THE KERNEL OR USER PAR/PDR'S. THE ROUTINE 
Sa WITH LOC. “VIRT1"’ CONTAINING THE 16-B1T VIRTUAL 


FERRARA AAAAE AEST AAAE AAA AAA ARAA AEA AAAAAAAAAAAAERARAAAKKAA ARE ee 


172340 FORMPA: MOV #KIPARO,R2 sLOAD ADDRESS OF FIRST KERNEL PAR IN R2 
140000 177776 BIT #140000 ,PSW 7 IN fog MODE? 


1$ :BRANCH IF NO 
177640 #UIPARO,R2 <POAD ADDRESS OF FIRST USER PAR IN R2 
1$: VIRT1,RO eh RTUAL ADDR. (VBA) INTO RO 

#-14,R0 

#177761,RO 

RO,R2 

(R2),RO 

ROR 

VIRT1,PBALO 

#160000 ,,PBALO 

F982 CLEAR OFF ALL BITS BUT BITS <1:0> 

RO :SH 3: 6> OF RO 


#6 HIFT PAR<9:0> TO <1 
whe RO [CLEAR BITS <5:0> OF R 


egesecoese 


e= 
—_ 


se 
ee 
;* 
;* 
;* 
** 
° 
:* 
. 
52 
‘ff 
° 
°@ 
. 
‘ff 
. 
;* 
‘* 
* 
‘* 
. 
:* 
° 


At eter ert 4 
NSM 
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un 035550 060037 001312 


035554 005502 
035556 010257 001314 
000207 


035562 


C 
MACY11 30A(1052) 29-JAN-79 15:10 


PAGE 93 
CONVERT VIRTUAL ADDRESS TO PHYSICAL ADDRESS 
:IN EFFECT, ADD VBA<12:0> TO PAR<9:0> 


RO, PBALO 


R2 
R2,PBAHI 
PC 


: (PAR<9:0> IN BITS <15:6> OF RO) 
sADD ANY CARRY TO R 

‘PUT BITS <17:16> - PHYSICAL ADDR. 
sRETURN TO PROGRAM 


IN PBAHI 





MD-11-CJKDA-A F-11 MAU DIAG 
29-JAN-79 14:38 
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035664 
035670 
035674 
0 


035752 


035754 
0 


035766 
035770 


sSee=sese 
W—MNVNOU—tY 


117746 
042716 


021627 
5 


000176 
143344 
143340 
177600 
000007 
001134 
036526 
036533 
000176 


036544 
143262 
143256 
177600 
000003 
036514 
000006 
001135 
000100 
036556 
000025 


036521 
000006 


000015 
000004 
000002 


MACY11 3041052) 
INPUT ROUT] 


001140 


000001 


000001 
143214 


143142 


8 
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-SBTTL TTY INPUT ROUTINE 


,tererereerererrrrreerecenerererrereeaeeeereneeeareneeeKAeeAeeese 


* ENABL LSB 


peeeeeneerererrererrerreeeeerereeereererereeeeenererereeeeeeeeTe 
: #SOF TWARE SWITCH REGISTER CHANGE ROUTINE. 

:*ROUTINE 1S ENTERED FROM THE TRAP HANDLER, WILL 

S*SERVICE THE TEST FOR CHANGE IN SOFTWARE SuitcH REGISTER TRAP CALL 


;*WHEN OPERATING IN TTY FLAG 
CAP #SWRE 


$CKSUR: 


T 
SGTSUR: 
a 


19$:_ 
7$: 


15$ 

asTKs 

15$ 
as1KB,-(SP) 
soci 7? << (SP) 


15$ 
SAUTOB #1 
15$ 


-SCNTLG 

. SMSWR 
SWREG,-(SP) 
 SMNEW 
-(SP) 


~ (SP) 
astKs 
7$ 


asTKB,-(SP) 
#°C177, (SP) 
(SP) #3 

%$ 

SSCNTLC 
#6,SP 
SINTAG,#1 
#100, aSTKS 
CNTRLC 


(SP) ,#25 
10$ 


E. 
e318 ora SOFT-SWR SELECTED? 
H IF NO 


OM THERE? 

F NO, DON'T WAIT AROUND 
::SAVE THE CHAR 
:sSTRIP-OFF THE ASCII 
44 IT A CONTROL G? 

. RETURN TO USER 

E WE RUNNING IN AUTO-MODE? 
+ BRANCH IF YES 


;;ECHO THE CONTROL-G (“6) 

7: TYPE CURRENT CONTENTS 

;:SAVE SWREG FOR TYPEOUT 

+260 TYPE--OCTAL > pias DIGITS) 


:1F NOT TRY AGAIN 


::PICK UP C 
::MAKE IT BIT ASCI1 


3:18 17 A CONTROL-C? 

>;BRANCH IF NOT 

3:YES, ECHO CONTROL-C (“C) 

7:CLEAN UP STACK 

7 ;REENABLE TTY KEYBOARD INTERRUPTS? 
>:BRANCH IF NO 

3; ALLOW TTY oe INTERRUPTS 
3;CONTROL-C RESTART 


21S IT A CONTROL-U? 
 TBRANCH IF NOT 

3:YES, ECHO CONTROL-U (“U) 
::1GNORE PREVIOUS INPUT 
;;LET'S TRY IT AGAIN 


:1S8 1T A <CR>? 

: }BRANCH IF _NO 
YES, us H THE FIRST CHAR? 

NCH IF YES 


7: SAVE NEW SWR 





— 8 
MO-11-CJKDA-A F-11 MAU DIAG MACY11 30A(1052) 29-JAN-79 15:10 PAGE 95 
CJKDAA.P11 29-JAN-79 14:38 TTY INPUT ROUTINE 


062706 000006 : 7;CLEAR UP STACK 

104401 001223 : :;ECHO <CR> AND <LF> 

123727 001135 000001 es TTY KBD INTERRUPTS? 
001003 15$ : f 


3 NOT 
000100 143120 , #100 ,astKs zs TTY KBD INTERRUPTS 


037120 : PC STYPEC 
000060 + ls 
000067 sae) OOF 
000060 #60,(SP)+ $3 “OFF ASCII 
000002 2(SP) 3:18 THIS THE FIRST CHAR 
3:BRANCH IF YES 
::NO, SHIFT PRESENT 
CHAR OVER TO MAKE 
:: ROOM FOR NEW ONE. 
000002 17$: 2(SP) :;KEEP COUNT OF CHAR 
177776 -2(SP), (SP) ::SET IN NEW CHAR 
7$ 3:GET THE NEXT ONE 
001222 18$: SQUES s: TYPE ?<CR><LF> 
BR 208 SI SIMULATE CONTROL-U 
-DSABL LSB 


peeeenerereeeerererereeereeerererereeeeeAeeeeeeeeeeeeeeeTeeTenee 


dey ey ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 
> *CALL: 
3: INPUT A SINGLE tee THE TTY 


3° ROCHP 
:* RETURN HERE ;:CHARACTER IS ON THE STAC 
@ :;WITH PARITY BIT STRIPPED OFF 


SROCHR: (SP) ,-(SP) ::PUSH DOWN THE PC 
000004 000002 MO 4 (SP) ,2¢SP) [:SAVE THE PS 
143022 1$: asixs S:WAIT FOR 

1$ 3:A CHARACTER 
143016 000004 a$TKB,4(SP) >:READ THE TTY 
177600 000004 #°C<177>,4(SP) ::GET RID OF JUNK IF ANY 
000004 000023 4(SP) #28 i318 17 A CONTROL-S? 


E 3 *:BRANCH IF NO 
142770 : astKs S:WAIT FOR A CHARACTER 
23 3;LOOP UNTIL ITS THERE 
a$TKB,-(SP) [:GET CHARACTER 
#*C177, (SP) S:MAKE IT 7-BIT ASCII 
000021 (SP)+,#21 [:1$ IT A CONTROL-0? 
2$ ::1F NOT DISCARD 1T 
1$ TIYES, RESUME 
000004 000140 33: 4(SP),#140 ::1$ IT UPPER CASE? 
4 ;:BRANCH JF YES 
000004 000175 4(SP),#175 ::1$ 17 A SPECIAL CHAR? 


H Y 
000040 000004 #40 ,4(SP) ;:MAKE JT UPPER CASE 
4$: l ;:G0 BACK TO USER 


**eeeReeeeereeeeeeeetereereteeteereteeaeeeeteeeeeeeeeeeereeereeee 


*THIS ROUTINE WILL INPUT A STRING FROM THE TTY 


— 2 OO 


— 
~NuwN 
~~ 
wens 


ett 
Skee 


So 
onnNun 


oo —-—-— 
SS8E=3 
BERIEIIAR 

NOOUNUIN 


aes 


bt txt tx 
SuSE RES 


So 
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s*CALL: 
: RDLIN ::INPUT A STRING FROM THE TTY 
RETURN HERE SSADDRESS OF FIRST CHARACTER WILL BE ON THE STACK 
7: TERMINATOR WILL BE A BYTE OF ALL O'S 
SRDLIN: R3,-(SP) 7s SAVE_R3 
C -(§P) ‘CLEAR THE RUBOUT KEY 
036504 1$: #STTYIN.R3 ZIGET ADDRESS 
036514 2$: USTTVINGD. .RS am i FULL? 
READ | ONE CHARACTER FROM THE TTY 
MOV (SP)+, (R3) sioer HARACTER 
000003 #3, (R3) '1S IT A CONTROL-C? 
E 108 [:BRANCH IF NO 
036514 :iTYPE A CONTROL-C (*C) 
TST (SP)+ CLEAN RUBOUT KEY OFF OF THE STACK 
S:RESTORE R3 
036556 ::GOTO CONTROL-C RESTART 
000177 : Tr tR3) 3318 11 A RUBOUT 
5$ *BR IF NO 
(SP) 3318 THIS THE FIRST RUBOUT? 
6$ >BR IF NO 
000134 036502 #'\,98 [:TYPE A BACK SLASH 
036502 9S 
177777 #1, (SP) :3SET THE RUBOUT KEY 
036504 R3,#STTYIN :STACK EMP 
036502 (R3) 98 : SETUP To TYPEOQUT THE DELETED CHAR. 


036502 
;:G0 READ re CHAR. 
;;RUBOUT KEY SET? 


7$ ::BR IF NO 
000134 036502 ee 3: TYPE A BACK SLASH 


036502 
CL (SP) ae THE RUBOUT KEY 
000025 : 21S a ee A CTRL U? 


E IF NO amt 
036521 : TYPE A CONTROL *U 
se START OVER 
000022 : 2315 CHARACTER A ‘'*R''? 
3$ ANCH IF NO 
: CLEAR THE CHARACTER 
001223 PE A ‘CR’ & LF’ 


036504 :: TYPE THE INPUT STRING 
R $ +260 ut ANOTHER CHACTER 
001222 sTYPE A 


:: CLEAR THE BUFFER AND LOOP 
;;ECHO THE CHARACTER 


000015 15, (R3)¢ : CHECK FOR RETURN 


L F NOT RETURN 
177777 -1(R3) T:CLEAR RETURN (THE "\5) 
001224 SLF His: A LINE F 
(SP)+ ;: CLEAN RUBOUT KEY FROM THE STACK 
(SP)+,R3 ; RESTORE R3 


Sx=s3 
&- 


SSSx8°85 
Nu 
be 
No 
NUS SINONMWNS 


— 
~ 


ow 
— — 


00 
02 
10 
11 
10: 


-—-OoO—-0—— 
SxSsSxnS5=S88 
—M— =—MUVFSM—NO FF — 
OnNSONOS NSE NNW 
—— | 00 | $$ OWwo “Wow 
AN ID S NIDA OU 


ooooooooeoo 


3333333333 
SENSREKESR 
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+ ADJUST THE STACK AND PUT ADDRESS OF THE 
3 FIRST ASCII CHARACTER ON IT 


000004 000002 
036504 000004 


7 ;RETURN 
9$: “ STORAGE FOR ASCII] CHAR. TO TYPE 
. 3; TERMINATOR 
STTYIN: . 8. 7 RESERVE 8 BYTES FOR TTY INPUT 
000 SCNTILC: . /*C/<15><12> ::CONTROL °C’ 
000012 S$CNTLU: . /*U/<15><12> 7: CONTROL ‘U"’ 
000 SCNTLG: . /*G6/<15><12> 7;CONTROL ‘'G’’ 
051127 SMSWR: . <15><12>/SWR = / 


020127 SMNEW: .ASCIZ / NEW = 
-EVEN 
-SBTTL CONTROL-C SERVICING ROUTINE 


tu THE FOLLOWING CODE IS EXECUTED WHEN A CONTROL-C HAS 
.” BEEN TYPED INSTEAD OF A NEW SWITCH REG. VALUE. 


Sooonwuwwu 
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CIN OTHER WORDS, AFTER A CONTROL-G WAS TYPED). 

A NEW SWITCH REG. Bar Bat BE ASKED Sef 

THE TEST NUMBER S NUMBER WILL BE TYPED, 

AND THEN THE PROGRAM. vit GO TO “END-OF-PASS' AND CONTINUE 


001234 001210 CNTRLC: MOV SPASS ,STMPS 7 THE VALUE OF ‘‘SPASS* 
Hak Y 1 STAPS A 


CSG 
001102 036630 $TSTNM, 1 
036630 1$,-(SP) 


036632 .2$ 
001210 MOV STAMPS ,-(SP) 


OR TYPEOUT 
O TYPE--DECIMAL ASCII WITH SIGN 
ASK FOR NEW SWR VALUE 
033652 J SEOP+2 sCONTINUE AT SEOP+2 
0 sBUFFER FOR TEST NUMBER 
eASCIZ / ;TWO SPACES AND THE STOP MESSAGE 
044520 CMSG: «ASCII 7 JUMPING TO END-OF -PASS/<15><12> 


051501 006523 


051505 047124 -ASCIZ /TESTNO PASSNO/<15><12> 
050040 051501 
047123 006517 000012 


-EVEN 
-SBTTL TYPE ROUTINE 


ppeeeeeneerereereerereerereeeeeeeeereeereeeeeeeeeeeeeeeeeReeeeees 
:*ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A 0 ait 
seTNs ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE F EED 
*NOTE1: $NULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 
‘ eNOTE2: SFILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
7 *NOTES: SFILLC CONTAINS THE CHARACTER TO FILL AFTER. 


-* 


*CAL 
jaf) USING A TRAP INSTRUCTION 
TYPE »MESADR 7:MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 


TYPE 
MESADR 


001157 a SIPFLG i318 THERE A TERMINAL? 
:IMALT WERE IF NO TERMINAL 


: 0,-( 7: SAVE RO 

000002 :3GET ADDRESS OF ASCIZ STRING 
000001 001246 #WAPTENV,SENV :3 wey: IN APT MODE 

BNE 62$ 0,GO CHECK FOR ? Dee 
000100 001247 #APTSPOOL , SENVM SPOOL MESSAGE TO A 

BEQ 628 3:N0,GO CHECK FOR CONSOLE 
036756 RO,61$ SETUP MESSAGE ADDRESS FOR APT 
037176 PC ,SATY3 ::SPOOL MESSAGE TO APT 





1 8 
MD-11-CJKDA-A F-11 MAU DIAG 15:10 PAGE 99 


MACY11 30A(1052) 29-JAN-79 
CJKDAA.P11 29-JAN-79 14:38 TYPE ROUTINE 


61$: thy fan ges ADDRESS 


000040 001247 62% 


037046 
037050 
037054 
037060 
037062 
037066 
037072 


037074 


— _ =—Oo— -—OoO— 
S S8R88S8sS8SuSn 
NV Ww we 
SNUNNNONES NS 
NWN FMNRWUMANONO— 
COGnNYnWw—o oso 


Naun~ 
onno 


SSSnssesese8s 


000002 
000011 
000200 


037164 


037120 
001156 


001154 
000001 


037120 
037164 


000040 
037120 
000007 


142024 


000002 
000015 


037164 
000012 


000001 
000001 


037164 


142016 
000002 


000002 


037434 
037432 


23: 


3S: 
4$: 


;HORIZONiAL TAB 


8$: 
9$: 


BR 
STYPEC: 
BP 


1$: 


INCB 
SCHARCNT: .WORD 


STYPEX: RTS 


0 
1 Netaaaaieataaal 


(RO)+,-(SP) 
S$ 

(SP)+ 
(SP)+,RO 
#2,(SP) 
#HT, (SP) 
#CRLF (SP) 
5% 


(SP)+ 


SCHARCNT 
2s 


PC ,STYPEC 
SFILLC, (SP)+ 


2s 
SNULL ,- (SP) 
1(SP) 

6$ 

PC ,STYPEC 
SCHARCNT 

7$ 
PROCESSOR 
#’ (SP) 
PC, STYPEC 
#7, SCHARCNT 
9$ 

(SP)+ 

2s 

asTPs 
STYPEC 
2(SP) ,a$TPB 
#CR,2(SP) 
1$ 
SCHARCNT 
STYPEX 

WF, sor 
STYPE 

(POs 


PC 


Py SUPPRESSED 
EYES, SKIP TYPE OUT 
3; PUSH CHARACTER TO BE TYPED — STACK 
R IF IT ISN°T THE TERMINA 
SIF TERMINATOR POP IT OFF THE * stace 


RESTORE RO 
SZADJUST RETURN PC 
BRANCH IF <HT> 
:sBRANCH IF NOT <CRLF> 


::POP <CR><LF> EQUIV 
3; TYPE A CR AND LF 


;;CLEAR CHARACTER COUNT 
;;GET NEXT CHARACTER 
::GO TYPE THIS CHARACTER 
2318 17 TIME FOR 4a CHARS.? 
:31F NO GO GET NEXT CHA 
7:GET # OF fnge CHARS. “NEEDED 
:;AND THE NULL CHAR. 
: sDOES A NULL NEED TO BE TYPED? 
IF NO--GO ei THE NULL OFF OF STACK 
:#60 TYPE A NUL 
NOT COUNT “AS A COUNT 


;;REPLACE TAB WITH SPACE 

>: TYPE A SPACE 

3;BRANCH IF NOT AT 

3; TAB STOP 

3:POP SPACE OFF STACK 

3:GET NEXT CHARACTER 

>2:WAIT UNTIL PRINTER IS READY 


;;LOAD CHAR TO BE TYPED INTO DATA REG. 
::1S CHARACTER A CARRIAGE RETURN? 
;;BRANCH IF NO 

+015 CBee CHARACTER COUNT 


EX 
1S CHARACTER A LINE peee? 
;;BRANCH IF YES 

:;COUNT THE CHARACTER 
>;CHARACTER COUNT STORAGE 


-SBTTL APT COMMUNICATIONS ROUTINE 


MPAA EREAALELELESLAL EEA SERRA RR REASESER ERE R ERR RRR A RASA RRR RAR RSS SS 


$ATy1: 
SATY3: 


MOVB 
MOVB 
BR 


#1, SFFLG 
#1, SMFLG 
SATYC 


;;TO REPORT FATAL ERROR 
7:10 TYPE A MESSAGE 
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000040 


000001 


037432 
000001 
000100 
000004 
000002 
001226 
001242 


001242 


001244 
000004 


000002 
177776 
036706 
037434 


001246 
001226 


037452 


MACY11 30A(1052) 


037434 


001246 
001247 


000004 


001226 


037344 
000004 


001230 
000004 


APT COMMUNICATIONS ROUTINE 
SATY4: #1,SFFLG 
SATYC: 

RO,-(SP) 
R1,-(SP) 
SMFLG 

5$ 
#APTENV,SENV 


#APTSPOOL , SENVA 


SMSGTYPE 
1$ 


RO, SMSGAD 
(RO) + 
2s 


SMSGAD , RO 
RO 


RO, SMSGLGT 
Stent 


5 

3: a4 (SP) ,4$ 
#2,4(SP) 
177776, -(SP) 
PC, STYPE 


SFFLG 

12% 

SENV 

12$ 

SMSGTYPE 

11$ 

@4(SP) ,SFATAL 


#2,4(SP) 
ye 


SMFLG: 
SLFLG: 
SFFLG: 


-EVEN 
APTSIZE=200 
APTENV=001 
APTSPOOL=100 
APTCSUP=040 


8 
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3:10 ONLY REPORT FATAL ERROR 


:: PUSH RO ON STACK 
;;PUSH R1_ON STACK 
Hoe Be TYPE A MESSAGE? 


OPERATING UNDER APT? 
3} SHOULD SPOOL MESSAGES? 
3 3GET MESSAGE ADDR. 


RETURN ADDR. 
7;SEE IF * DONE W/ LAST XMISSION? 
331F NOT: WAIT 

;;PUT ADDR IN MAILBOX 

::FIND END OF MESSAGE 


;;SUB START OF MESSAGE 

;:GET MESSAGF LNGTH IN WORDS 
;:PUT LENGTH IN MAILBOX 

7; TELL APT TO TAKE MSG. 


::PUT MSG ADDR IN JSR LINKAGE 
RETURN ADDRESS 

PUSH 197776 ON STACK 

::CALL TYPE MACRO 


+s SHOULD REPORT FATAL ERROR? 
:31F NOT: BR 


¢ RUNNING UNDER APT? 
:1F NOT: BR 
: FINISHED or MESSAGE? 
NOT: WAIT 


::GET ERROR # 
;BUMP RETURN ADDR. 
23 TELL abi TO Ma ERROR 


::POP STACK INTO R1 
::POP STACK INTO RO 
7 RETURN 

7:MESSG. FLAG 

;;LOG FLAG 

;: FATAL FLAG 


-SBTTL BINARY TO ASCI] AND TYPE ROUTINE 


peteeerererereeeeeeeereeeeereeereetreteeeeeReKeAe eee AKee REA e ee 


SATHIS ROUTINE 1S USED TO CHANGE ' 16-B1T BINARY NUMBER TO A 16-B1T 


:*BINARY@ASCI] NUMBER AND TYPE IT 
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03 
037510 


ma 
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S=S22 
—O—— 
~ SS 
MNS a NING — 
Sess. = 
—N eS OD 


ow 


ooo soos 
Sept 
morn We 
= or 

o — Piatra YY 


000 


SSSSSSa8S==5 
—* a eet ot — 1 
Wmooornr ren VYe so 
| UNNNE NOOO 
op epes dp opel § 
oANNNOO NNO 


wae 
oss 
soo 


000006 
000060 


037510 
037510 


000002 


000 


000000 


000002 
000001 


000006 
000005 


037737 
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037510 


000004 


ARY TO ASCII AND TYPE ROUTINE 
s*CALL: 
: MOV NUMBER ,-(SP) > :NUMBER TO BE TYPED 
; TYPBN sc TYPE IT 
STVYPBN: MOV R1,-(SP) 3:SAVE R1 ON THE STACK 
MOV 6(SP),R1 at THE INPUT NUMBER 
SEC T “'C** SO CAN KEEP TRACK OF THE NUMBER OF BITS 
18): MOVB #'0,$BIN a CHARACTER TO AN ASCII ‘0’. 
ROL R1 33GET THIS BIT 
BEQ 23 33 ? 
ADCB $BIN > INO--SET a “ee EQUAL TO THIS BIT 
TYPE -SBIN aes TYPE T T 
CLC AR c's “~s KEEP TRACK OF BITS 
BR 1$ At 00 THE NEXT BIT 
MOV (SP)+,R1 >: POP THE STACK INTO R1 
MOV 2(SP) ,4(SP)  SADJUST THE STACK 
MOV (SP)+, (SP) 
RT] + RETURN TO USER 
SBIIN: -BYTE 0,0 sSTORAGE FOR ASCI] CHAR. AND TERMINATOR 


SBTTL BINARY TO OCTAL (ASCII) AND TYPE 






REAAATAAASEAAATAEAAAAAAERACAAEAAATAAKAARARARAAAAAARAAARAAARAAAARAARAEEAE 


R 
33 1=TYPE LEADING ZEROS 
;;0=SUPPRESS LEADING ZEROS 


‘eSTYR ON----ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
ieSTVR OS OR $TYPOC 
° L ° 


:*THIS ROUTINE 1S USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT 
s*QCTAL (ASCI11) NUMBER AND TYPE IT. 

0 ata HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 
*@ 

7* MOV NUM, -(SP) > NUMBER TO BE TYPED 

sf TYPOS 3:CALL FOR tg 

;* -BYTE N 3:N=1 TO 6 FOR NUMBER OF DIGITS TO TYPE 

;* BYTE M&M 3:M=1 OR O 

7* 

“° 


:« ~~ \ Mov NUM, -(SP) :;NUMBER TO BE TYPED 
ts TYPON CALL FOR TYPEOUT 

;* 

; #81 ¥PO =-ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 
= *CALL: 

ie Ov NUM, (SP) :;NUMBER TO BE TYPED 
ie YPOC SICALL FOR TYPEOUT 


(SP) ,-(SP) ;;PICKUP THE MODE 
3 4g SOF ILL ;:LOAD ZERO FILL SWITCH 
P)+,S$OMODE+1 ;:NUMBER OF DIGITS TO TYPE 


STYPOS: MOV 
MOVB 


~ 2.<SP) ; ADJUST RETURN ADDRESS 
$TYPOC: MOVE 1, S0F ILL ;;SET THE ZERO ‘Att eo 


MOVE #6, SOMODE+1 7:SET FOR S1X(6) 
STYPON: MOVB #5, SOCNT 2:SET THE ITERATION COUNT 


MOV R35,-(SP) 7: SAVE R3 
MOV R4,-(SP) 7: SAVE R4 
MO R5,-(SP) 


V 7; SAVE RS 
MOVB SOMODE+1,R4 ::GET THE NUMBER OF DIGITS TO TYPE 


SEQ 0101 
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037572 RG \ 
7 #6,R4 \ tr iT FOR MAX. ALLOWED 
R4, sSAVE_IT FOR USE 
SOF ILL.R4 ::GET THE ZERO FILL SWITCH 
$3 HE INPUT NUMBER 


12(SP) RS 

R3 7;CLEAR THE OUTPUT WORD 
;;ROTATE MSB INTO “'C’ 
::60 DO ASB 
::FORM THIS DIGIT 


8 
0 * pace 102 
ND TYPE 


1 
A SEQ 0102 


238338 


S2 
e o—--wWOoooodoe 


: R 3:GET LSB OF THIS DIGIT 
037736 23 TYPE = DIGIT? 


$ :BR IF 
177770 ’ $3GET nD OF JUNK 
4% EST FOR 0 
i: SUPPRESS THIS 0? 
F YES 
: R4 ::DON'T SUPPRESS ANYMORE 0'S 
000060 S MAKE THIS DIGIT ASCII 
: a" URS E ASCI] IF NOT ALREADY 
SAVE FOR TYPING 
.8$ 2:GO0 TYPE THIS DIGIT 
037734 : ::COUNT BY 1 
2$ ::BR IF MORE TO DO 
::BR IF DONE 
3: INSURE LAST DIGIT ISN'T A BLANK 
3:60 Mg Ft, DIGIT 


S estes 
PANO 
vexso 
RWS NWAAAD 


($ rt 7 sRESTORE R3 
000002 000004 :;SET THE STACK FOR RETURNING 
(SP)+, (SP) 


; ;RETURN 
8$: ° +s STORAGE FOR ASCII DIGIT 
. ; TERMINATOR FOR TYPE ROUTINE 
SOCNT: .BYTE THOCTAL DIGIT COUNTER 
000 SOFILL: .BYTE yer FILL SWITCH 
000000 SOMODE: .WORD 0 NUMBER OF DIGITS TO TYPE 
.SBTTL CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


peeeenererereereeeerererererereereeneeeeeneeeeeeeeeeeeereRereeee 
SeTHIS ROUTINE 1S USED TO CHANGE A 16-BIT BINARY NUMBER TO A 5-DIGIT 
S*SIGNED DECIMAL (ASCII) NUMBER AND TYPE IT. Be ar teas -” WHETHER THE 
:*NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPED 
S*BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE 

i #REPLACED WITH SPACES. 
7 *CALL: 


:* MOV NUM, = (SP) ;:PUT THE BINARY NUMBER ON THE STACK 
i TYPOS 3:60 TO THE ROUTINE 


STYPDS: 

r RO,-(SP) ;;PUSH RO ON STACK 
R1,-(SP) ::PUSH R1 ON STACK 
R2,°(SP) 3;PUSH R2 ON STACK 
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R3,-(SP) +3PUSH R3 ON STACK 

R5 (SP) +3PUSH_RS ON STACK 
020200 23SET BLANK SWITCH wr SIGN 
000020 O(SP) RS T T 


000055 000001 


: + 
040154 sSDBLK R3 POINTER 
600040 , (R3)4 SISET THE FIRST CHARACTER TO A BLANK 
: 33CLEAR THE BCD NURBER 
040144 S$DTBL(RO),R1 [GET THE CONSTAN 
: R1,R5 3 3 FORM THIS BCD DIGIT 


:BR 
$P INCREASE THE BCD DIGIT BY 1 


—— = 


z2 
=s 


::ADD BACK THE CONSTANT 
2 sCHECK IF BCD DIGIT=0 

ALL THROUGH IF 0 
;:STILL DOING LEADING 0'S? 
:2BR If y YES 


6$ 3:BR IF NO 
177777 1(SP) ,-1(R3) 7: YES--SET THE SIGN 
6 #'0,R2 


7 :MAKE THE BCD DIGIT ASCII 
#* ,R2 s:MAKE IT A SPACE IF NOT ALREADY A DIGIT 
R2,(R3)+ ::PUT THIS CHARACTER IN THE OUTPUT BUFFER 
(RO)+ 7: JUST INCREMENTING 
RO,#10 : 5 CHECK THE TABLE INDEX 
23 :G0 DO THE NEXT DIGIT 
8$ ::G0 TO EXIT 
R5,R2 + 3GET THE LSD 
6$ 3G0 CHANGE TO ASCII 
(SP)+ 3 3WAS a THE FIRST NON-ZERO? 


I 
177777 177776 . ptt ietteaees i EYES==SET THE tod FOR TYPING 


040154 SOBLK ::NOW TYPE THE 
000602 000004 P :;ADJUST THE STACK 


(SP)+, (SP) 
;;RETURN TO USER 
SDTBL: 


040154 000004 SDBLK: BLK 
.SBTTL SAVE "Ano RESTORE RO-R5 ROUTINES 


ppeeeereeeeerteeereeeeeerereeee reer eee ee KeeARe RAK eee AAA 


7 *SAVE RO-R5 
3; *CALL: 





“ere 
= = 
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5009 7* SAVREG 
soit >*UPON RETURN FROM SSAVREG THE STACK WILL LOOK LIKE: 
;* 
5012 3 *TOP---(+16) 
5015 pe 42=<=(418) 
5014 zt 4h---R5 
5015 38 46---R4 
5016 3% +B8---R35 
5017 3#410---R2 
5018 3#412---R1 
5019 3#414---R0 
5020 
5021 040164 SSAVREG: 
5022 040164 01 MOV RO,-(SP) PUSH RO ON STACK 
5023 0401 010146 MOV R1,-(SP) 7;PUSH R1 ON STACK 
$024 040170 010246 MOV R2,-(SP) 33PUSH R2 ON STACK 
25 040172 010346 MOV R3,-(SP) 7;PUSH R3 ON STACK 
5026 040174 010446 MOV R4,-(SP) as H R4 ON STACK 
5027 040176 010546 MOV R5,-(SP) 7:PUSH RS ON STACK 
5028 040200 01 MOV 22(SP), -(SP) 3;SAVE PS OF MAIN FLOW 
5029 0402 01 000022 MOV 22(SP) ,-(SP) 7:SAVE PC OF MAIN FLOW 
5030 040210 016646 000022 MOV 22(SP).-(SP) 3:SAVE PS OF CALL 
5031 040214 016646 000022 MOV 22(SP) ,-(SP) 3:;SAVE PC OF CALL 
sose 040220 000002 RTI 
5034 s*RESTORE RO-RS 
5035 7 *CALL: 
5036 ;* RESREG 
5037 040222 SRESREG: 
5038 040222 012666 000022 MOV (SP)+,22(SP) 7:RESTORE PC OF CALL 
5039 040226 012666 000022 MOV (SP)+,22(SP) > :RESTORE PS OF CALL 
5040 040232 012666 000022 MOV (SP)+,22(SP) RESTORE PC OF MAIN FLOW 
5041 0402 012666 000022 MOV (SP)+, *22(SP) s:RESTORE PS OF MAIN FLOW 
5042 040242 012605 MOV (SP)+,R5 + POP STACK INTO RS 
5043 040244 012604 MOV (SP)+, *RG sPOP STACK INTO R4& 
5044 040246 012603 MOV (SP)+.R3 : POP STACK INTO R3 
5045 040250 012602 MOV (SP)+,R2 3:POP STACK INTO R2 Pg 
5046 040252 012601 MOV (SP)+,R1 :;POP STACK INTO R1 Hie aa 
5047 0402 012600 aT (SP)4, RO :;POP STACK INTO RO EE Fee ee aap 
5048 040298, 000002 RTI 5 nS 
044 -SBTTL DOUBLE LENGTH BINARY TO OCTAL ASCI] CONVERT routine et 
5051 <2 peeeeererererrerer eegeereentecceeeresetcerneerersenty gererere z 
$052, $ S@THIS ROUTINE vit eae a 32-811 ier resengibee TO AN fre = 
3053 =. se ® ; UNS 1GNED OCTAL ASC] ea: Tr. e deen 
bs of — ;* _—_~ 2 —™“ es 4 : 
5055 ” ;* MOV. -° #PNTE + ::POINTER TO LOW WORD'OF BINARY NUMBER - “=@"Pregificgaas : {= 
5056 — 8 JSR: PE @e$D oe “4 $3CALL THE ROUTINE ae Ui 
$057 rn ae 7* . RET pas € ::THE ADDRESS OF THE FIRST ASCIZ CHAR. IS ON THE STACK rae 
| 8089 oe A eee ey th 
5060 040260-° 104413 $DB20: SAVREG :: SAVE ALL REGISTERS x 2t, bay 
§061 040262 016601 000002 MOV 2(SP),R1 ¢sPIC KUP THE POINTER TO LOW WORD : a ae 
5062 040266 012705 040377 MOV #SOCTVL+13.,R5 POINTER TO DATA TABLE PIE ea gta? 
$063 040272, 012704 000014 MOV #12. RG D0 ELEVEN CHARACTERS rie ape 
$064 040276 012703 177770 + BOM WAC? RS : MASK : wy 
4 om _—Z 
aetee, oh as : 
> S ° 7a he ¥ = ~ o7> are 
~~ 
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000060 
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105 
DOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT ROUTINE 


1$: 


2$: 
3$: 


SOCTVL: 


B 
-BLKB 


(R1)+,RO 
(R1)4*,R1 


R 
R2,-(R5) 
2 


; NATOR 
:EPUT CHARACTER IN DATA TABLE 
7 THIS DIGIT 
;COUNT THIS CHARACTER 
::BR IF NOT THE LAST DIGIT 
‘BR If 11 JS THE LAST DIGIT 
eo Aub L DIGITS er it roe STA oy FIRST 


IZ CHAR. T ONT 
S ERESTORE ALL REGISTERS 
; RETURN TO USER 

;:POSITION THE MASK FOR THE LAST DIGIT 
:sPOSITION THE BINARY NUMBER FOR 

33 THE NEXT OCTAL DIGIT 


;;MASK OUT ALL JUNK 

;:MAKE THIS CHAR. ASCII 

;;GO PUT IT IN THE DATA TABLE 
; RESERVE DATA TABLE 


SEQ 0105 
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-SBTTL TRAP DECODER 


peeeeeeererererereereerrerrereereereerenereeneereeeeeReeeeeeeet 
{STIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE ‘'TRAP’’ INSTRUCTION 
>*AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
*OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 
:*G0 TO THAT ROUTINE. 


STRAP: RO,-(SP) 33 SAVE_RO 
000002 MO + GET TRAP ADDRESS 
) sBACKUP BY 2 
3GET RIGHT BYTE OF TRAP 
RO sPOSITION FOR INDEXING 
040434 MO STRPAD(RO).RO 3; 1NDEX TO TABLE 
RO ;:G0..10 ROUTINE 


—_ 


:;THIS 1S USE TO HANDLE THE ‘’GETPRI'’ MACRO 


011646 STRAP2: MOV (SP) ,-(SP) ;:;MOVE THE PC DOWN 
016666 000004 000002 MOV 4(SP),2(SP) ;:MOVE THE PSW DOWN 
000002 RTI ; RESTORE THE PSW 


~-SBTTL TRAP TABLE 


;*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
3*BY THE ‘’TRAP’’ INSTRUCTION. 


; ROUTINE 


040422 STRPAD: . STRAP2 
$1 3: CALL=TYPE TRAP+1(104401) TTY TYPEOUT ROUTINE 
3; CALL=TYPOC TRAP+2(104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
3; CALL=TYPOS TRAP+3(104405) TYPE OCTAL NUMBER (NO LEADING ZEROS) 
;;CALL=TYPON TRAP+4(104404) TYPE OCTAL NUMBER (AS PER LAST CALL) 
;:CALL=TYPDS TRAP#5(104405) TYPE DECIMAL NUMBER (WITH SIGN) 
037436 STYPBN ;;CALL=TYPBN TRAP+6(104406) TYPE BINARY (ASCII) NUMBER 


035634 SGTSWR ;;CALL=GTSUR TRAP+7(104407) GET SOFT-SWR SETTING 


035564 SCKSWR ;;CALL=CKSUWR TRAP+10(104410) TEST FOR CHANGE IN SOFT-SWR 
SROCHR +3 CALL= ROCHR 
SROLIN ;;CALL=RDLIN 
SSAVREG SE CALL=SAVREG OUT INE 
SRESREG ;;CALL=RESREG TRAP+14(104414) RESTORE RO-R5 ROUTINE 
-SBTTL POWER DOWN AND UP ROUTINES 


MMMM NWNNNID 2 2 et OO Os Ot Ss oe 


ee eS SRS SKS SSUES ORO US sane anrun-coBSusoRAw 


peeeeeereerereerrerererereterererereeeeeeeeeeeeeereeeeeeeeeeeeee 
“DOWER DOWN ROUTINE 
040644 000024 SPURDN: MOV #SILLUP ,a#PWRVEC ot? FOR FAST UP 
000340 900026 MOV #340, QAPURVEC#? ie 0:7 
RO,- SP) PUSH RO ON STACK 


R1,-(SP) 
R2,-(SP) H R2 ON STACK 
R3,-(SP) : » ON STACK 


040512 R4,~(SP) ON STACK 


5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 


ee ee ee ee ee eee ee | 
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146 010546 R5,-(SP) 33PUSH R5 ON STACK 
@SUR ,- (SP) :;PUSH @SWR ON STACK 
SP ,SSAVR6 3:SAVE SP 
000024 #SPURUP ,a#PWRVEC ;;SET UP VECTOR 


-72 :;MANG UP 


s, eeerereerererererereeereeeeerereeReKAReetraeneerereeeeAReeeenene 


;POWER UP ROUTINE 
000024 S$PWRUP: MOV #SILLUP ,a#PWRVEC ;;SET FOR FAST DOWN 
MOV SSAVR6,SP ae SP 
SSAV :;WAIT LOOP FOR THE TTY 
040650 18: SSAVR6 3;WAIT FOR THE INC 
1$ WORD 


140350 (SP)+,@SWR ::POP STACK INTO @SWR 
(SP)+,R5 :;POP STACK INTO R5 
(SP)+,R4 :;POP STACK INTO R4& 
(SP)+,R3 33POP STACK INTO R3 
(SP)+,R2 :3POP STACK INTO R2 
(SP)+,R1 ;;POP STACK INTO R1 
(SP)+,RO :3POP STACK INTO RO 
040466 000024 #SPWRON @#PWRVEC >;SET UP THE POWER DOWN VECTOR 
000340 000026 MOV #340, ,a#PWRVEC+2 ;;PRIO:7 
— T ::REPORT THE POWER FAILURE 


PWRASG ::POWER FAIL MESSAGE POINTER 
0 (PC)+, (SP) 7 RESTART AT RESTRT 
SPWRAD: . ESTRT ; RESTART ADDRESS 
000020 000002 #20,2(SP) ;3CLEAR ‘'T’’ BIT 
034130 STBIT 7;CLEAR THE ‘‘T’’ BIT FLAG 
SILLUP: :: THE POWER UP SEQUENCE WAS STARTED 
. ;; BEFORE THE POWER DOWN WAS COMPLETE 
SSAVR6: 0 ;;PUT THE SP HERE 
050040 053517 PWRMSG: .ASCIZ <12><15>? POWER FAILURE - RESTARTING ?<12><15> 


SEQ 0107 


WN BOS ALAN2SSSE55 


FOSS Se SSSSSSSSsSc 
o 


eee 


020107 


5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 


as ee ek ee td ot at od 


RPSVSSSSVTARATASSS LS SKARSSSSLSGFALLSSELSS 
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-SBTTL ERROR MESSAGES, DATA HEADERS-TABLES & FORMATS 
O73 182 goeree EMI: -ASCIZ /UNEXPECTED CPU TRAP TO LOC. 004/ 


w 
— 
at 


/UNEXPECTED MEM. MGMT. TRAP TO LOC. 250/ 


031040 


051117 : . /PRIORITY BITS SET WRONG IN PSW/ 
044502 , 


a a Ls 
SSSLHSESLSESE 


3 
RRRRRRRRREKLLKRRKRRLELLLKEKELLELKLLRRELLLKRELLLELLLLESSE 


PAPAAAPAAPAMAMAMAAMAAUMAVIUAI 
WN 


NmMNrNNnty 
ess 


Oo 
w 
LF 


051520 
041040 : ‘ /MODE BITS SET WRONG IN PSW/ 


Rises 


050040 
020114 : . /DUAL ADDRESSING BETWEEN HI8LO BYTES OF PSwW/ 


tw 
Mmwr 


051520 
046105 : . /KERNEL R6 CHANGED BY WRITING USER R6/ 


033122 
046505 : . /A MEMORY MGMT. REG. TIMED OUT/ 


MIPINIMPINNY Ot Ot OO es 
FSSERSSSSNESS 


& Fwwmuv w LALA Po PoP 
~SSSVSUFUSSSSONSGRUN UMS SeNSaru 
WMA & ve 


oonw 


052125 
040515 -ASC1Z /SUMMARY OF MEM. MGMT. REG. TIMEQUTS/ 


wm 
MMM PNP MMMPP PP PP Pere rnrfr 
PROMI POPIPIDIMI NPP 8 tS OP 


SSane 


ian 
N= 
Ne 
S 
WANMANWOUNUIN OW 


051524 


020056 -ASCIZ /MEM. MGMT. REG. WOULD NOT CLEAR/ 
020056 
053440 


me me ee ee ce ee eee ee ee ce ee ed et ed oe ot —t 


5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 


Mons MroPoreorerorys 
Wala aan 

o 
Se undibeuie tegen 


weve 
nes 
mww 
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5242 041360 
5243 041366 
5244 0413746 
5245 041377 
5246 041404 
5247 041412 
5248 041420 
5249 041426 
5250 041434 
5251 041442 
5252 041446 
5253 041454 
5254 041462 
5255 041470 
5256 041476 
5257 041505 
5258 041510 
5259 041516 
5260 041524 
5261 041532 
5262 041536 
5263 041544 
5264 041552 
5265 041560 
5266 041566 
5267 041574 
5268 041602 
5269 041610 
5270 041612 
5271 041620 
5272 041626 
5273 041634 
5274 041642 
5275 041650 
5276 041654 
5277 041662 
5278 041670 
5279 041676 
5280 041704 
5281 041712 
5282 041720 
5283 041726 
5284 041734 
5285 041742 
5286 041750 
5287 041756 
5288 041764 
5289 041772 
5290 042000 
5291 042006 
5292 042014 
5295 042021 
5294 042026 
5295 042034 
5296 042042 
5297 042050 


NMmMNON-—w——O— = 
WEFWF aa 


= 
mrmeuwnr 

~ 

—— 


GSFESLESSEE 
sE=e 


047117 


042114 
041440 


PSUS anes 
MUN" 


3 


RNowo 
SONU ww 


oS 

= 

ed 

Sees Nea 
MOUUUE SNE MNWUIS MNES oS NU 


o-—-OVND 


Fg 
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042120 
040440 


042120 


EM12: 


_ M13: 


EM14: 


EM15: 


EM16: 


—EM17: 


EM20: 


EM21: 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


/MER. MGMT. REG. BITS NOT SET CORRECTLY/ 


/SRO EFFECTED BY WRITE TO PSW/ 


/SR1 DID NOT READ ALL ZEROS/ 


/DUAL ADDRESSING BETWEEN BYTES OF PAR OR PDR/ 


/DUAL ADDRESSING BETWEEN PAR-PDR'S/ 


/PHYSICAL ADDRESS FORMED WRONG/ 


/PHYS. ADDR. FORMED WRONG IN RELOCATE MODE/ 


/W-B1T DID NOT GET SET IN PDR/ 


/W-BIT SET IN MORE THAN ONE PDR/ 


SEQ 0109 
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33 


peoles EM23: .ASCIZ /W-BIT NOT CLEARED BY WRITING TO PDR/ 


/WRITING SRO SET W-BIT IN KIPDR7/ 


SSSSSRESSs 


7111 
051104 
020124 - -» /W-B1T GOT SET DURING TIMEOUT ABORT/ 


/MEMORY MGMT. ACCESS ABORT DID NOT OCCUR/ 


DUP PUDUPUDUIUSUSVSUS SSSA SUN? 
AANA 


POPRIPRIPOIRD t cet et et et et ot  ot t 
FUNnr SO GCeaneuvilwn—o 


WWWwmuw 


/ACCESS ERROR DID NOT ABORT INSTRUCTION/ 


Www 
MND 
Cane 


/SRO DID NOT REPORT ACCESS ERROR CORRECTLY/ 


wuy=s 


/DID NOT LOCKUP CORRECT VIRTUAL ADDR./ 


rae yet wet pe yeh yes el 
SSGERE 


WMeEwNM—oOo 


042104 
043501 4 — /PAGE LGTH. ABORT OCCURRED WHEN IT SHOULDN'T HAVE/ 


ESEFEFESEE 
WN—=SoeN 


5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
53 
53 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 


WAU 
Pann 


044040 
042544 
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oe et EM33: .ASCIZ /PAGE LGTH. ABORT DiD NOT OCCUR WHEN IT SHOULD HAVE/ 


w 
WAAL 
SSGSAE 


xs 


/SRO DID NOT REPORT PAGE LGTH. ABORT CORRECTLY/ 


SESSEERSE 
3 
on 


& 


/SRO OR SR2 CHANGED BY A SECOND ABORT/ 


PUPP AP AAAAAAAA TIN 


WANA ANN 
SAN 


ww 
~N 
oc 


ANN 
NOUS WN OO 


/SRO OR SR2 WERE NOT "'RESET’’ BY A RESET/ 


Esse 


051505 
047040 P+ /SR2 NOT TRACKING CORRECTLY/ 


041505 
047516 : ‘ /D1D NOT TRAP THRU KERNEL SPACE/ 


SSesee 


eases 
SEgeF 


042503 
051105 t /KT ERROR NOT SERVICED ON TIMEOUT ERROR/ 


Wu 
eS 


5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 


SSss 
PLLLLLLLLLSLLLRELLE 


051105 
051117 hen /SRO OR SR2 CHANGED BY TIMEOUT ERROR/ 


SEP 

eh Ld Lt Lt Lt Ld Lt Lt Lt Ut Lt Lt Ut Lt Ut 

ROPQPRIPIRY @ et et et et ot ot ot ot ot oe 
—— 

SRESSHFSNESSNAEES 

SSPRESSESSESE 


020122 i=. /ERROR DURING ‘‘DOUBLE ERROR’ (KT & TIMEQUT)/ 





1 9 
MD-11-CJKDA-A F-11 MMU DIAG MACY11 30A(1052) 29-JAN-79 15:10 PAGE 112 
CJKDAA.P11 29-JAN-79 14:38 ERROR MESSAGES, DATA HEADERS-TABLES & FORMATS SEQ O112 


aaanee ae 
ot 


S 


/MFPI INSTRUCTION PUSHED WRONG DATA/ 


WvoZSs 


~~ ~ 
Soneoonnoounrsed 
RNo-— 


~m 
WENNEOVOOOWw 


/ATPI] INSTRUCTION LOADED WRONG DATA/ 


Wee 
—NNRONN— 


Vwoons & WRARSLSRA= 


FRRRLLLLLLLLLLKLLS 
¥ Land 


/STACK NOT PUSHED BY MFPI-MTPI/ 


Seve 2 
w w 
nn 


GDONENOONEO— 


044520 
042516 Bercy /KERNEL PAGE ACCESS INSTEAD OF USER: MFPI-MTPI/ 


FFEFEL ELSES EE 
nroavt a 


Ww 
worm 


/WRONG POR'S REFERENCED WHILE IN RELOCATE MODE/ 


° 

w 

as 

RRA 
Noe 

oon 


04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 


PALA 
w 
o 


w 


/MFPD INSTRUCTION PUSHED WRONG DATA/ 


Sesss 
F¥QVIUVASSS 
MO we eS 


wre 
On FoOow 


3 


/STACK NOT PUSHED BY MFPD-MTPD/ 


RALSSSF LRELKSS 


SOS 
S58 


/PAR OR PDR CHANGED BY A RESET/ 


RRRRKKKKKKKKLKEK 
Wanna 3 
ANN 
mn 
oor 

So 

— 
wu—Orwnr—-OnNoo 
OMENS a 
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EM56:  .ASCIZ /PSW CHANGED BY AN RTI IN USER MODE/ 


RO=se 


/OLD PC OLD PSW R6 WAS TESTNO ERRORPC/ 


/OLD PC OLD PSW R6 WAS SRO SR2 TESTNO ERRORPC/ 


051117 
042524 : ° /WROTE READ TESTNO ERRORPC/ 


051117 
042522 : ° /ADDRESS TESTNO ERRORPC/ 


051117 041520 
043505 051511 -ASCII /REGISTER-ADDRS NUM OF/<CRLF> 


020040 


042116 : /AND-ED OR-ED TIMOUTS TESTNO ERRORPC/ 
er 


SSssse 
2 


eASCI1] /REGISTR READ READ=(BINARY)/<CRLF > 


co ecscee 
mM O 
FNANNOmA 


SOO@ONO WF wn—oO 
FRSA SRA 


/ADDRESS (OCTAL) 5432109876543210 TESTNO ERRORPC/ 


oo OooCooo oOooO 
FP MLV WSwm 


a 
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024514 
30462 


w 
w 
™m 
Nm 


Mmrmrrnrnwr 
SONS USE Ve 


-ASCII] /REGISTR WROTE READ READ~(BINARY)/<CRLF > 


/ADDRESS (OCTAL) (OCTAL) 5432109876543210 TESTNO ERRORPC/ 


Ee i cere ntapetestset ete ehehohatohatoke 
SSGERFUNLS 


PEDUDUPUTUDUSV Ia SUSU SSIS 
es 
nu—oO 


/READ TESTNO ERRORPC/ 


051117 041520 


051101 050055 Kies /PAR=PDR PAR-PDR/<CRLF > 
050040 


/CLEARED EFFECTD EXPECTD RECEIVD TESTNO ERRORPC/ 


SSeS 


041520 
044523 bres /PHYSICL VIRTUAL/<CRLF> 


5 
55 
52 
5 
5 
5 
5 
5 
5 
5 
5 
5 


FSS 
wre 
ra 


o 
wo 
—MNrNONO 


/ADDRESS ADDRESS KIPAR4 TESTNO ERRORPC/ 


PPAPAAAA 
Sis 
MIWA Fua WN 


/PHYSICL PAR 4 PAR 5/<CRLF> 


FUDUDVTUDUDUDUDUDUTUSa SUS SUDPSUSSUSTIS 
wu 


™~ ~ 

NoRRun—sos 
Soron—— 
~—SSRSNNO— NU eo 


200 
042104 042522 : /ADDRESS VBA VBA PAR 4 PAR 5S  PSW TESTNO ERRORPC/ 
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051523 
020040 02 


os 
MmnN—on 


-ASCI] /POR VIRTUAL/<CRLF > 


-ASCIZ /TESTED ADDRESS TESTNO ERRORPC/ 


RELLLLLELLLLLLLL 


PEPE PUDUPUPUSUSUSUSUSUS I SOS 
[Oy 6 ee eee ee eee 


/PDR IN PDR VIRTUAL/ 


NESoSnotre 


/ERROR TESTED ADDRESS TESTNO ERRORPC/ 


/PDR TESTNO ERRORPC/ 


$3 


/PDR WAS EXPECTD TESTNO ERRORPC/ 


—~ 
~m 


050122 
020064 Pas /PDR & = =PSW TESTNO ERRORPC/ 


Se ah tah th ah abd bedbedb bb ebb ebb ubh bbb bh ab ebb che sl 
w 
orm 


SNFES 


¥¥ 

Ws & uw 

soon 
SES 
rw 
=~ 
eet eet st 
or 


WANA OONUIWWWI Me 


/SRO WAS EXPECTD PDR 4 = PSwW TESTNO ERRORPC/ 


/SR2 WAS EXPECTD PDR 4 = PSw TESTNO ERRORPC/ 


O04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 


Soooooooooo 

MUS SOU WNNW 
Soooooooooo 4 
MMRIWMNM SMM MUTYD 3 
WMNRNOfLN 


oon 
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052103 


~ 
Rae OF 
ot 

= 


im 
oo 


KIPDR4 SRO WAS SR2 WAS TESTNO ERRORPC/ 


FERRLREL 
Ess 
FOOnS 
z 


ooo 
mmuvon~ 
8s 


3 
POSE 


Soe 
—Noo—nwn~ 


SnFos 
oo 
SEE 


KiPDR4 TESTNO ERRORPC/ 


veo 


NS 


KIPDR4 SRO WAS EXPECTD TESTNO ERRORPC/ 


PAAMAAAMAMAAA 
$3 


FLRRLLLLKRLLKLLEL 


HEE 


sssss? 
MMuMmnuw 
So w~ 


3 


KIPDR4 SR2 WAS EXPECTD TESTNO ERRORPC/ 


EN 


2 
046032 
046040 
046046 
046054 
046062 
046070 


ooooo 
MMM 
—NNo—nrn 


QRASSnSakosnkro 


/SR2 WAS EXPECTD TESTNO ERRORPC/ 


oooo 
ADIN EIR O 
ooooo 
FF 


Ets 


/FIRST ABORT SECOND ABORT/<CRLF> 


a ed td ot ot at ed 
SeSSVUSUUNs 
= 


II IIIII 35 


FRSEL 
ARUN FF 


/SRO WAS SR2 WAS SRO WAS SR2 WAS TESTNO ERRORPC/ 


Sooooooeo 
Sooooooocoo 


OP eh aha) 
ON Fs ONO Wwe 
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17 
RROR MESSAGES, DATA HEADERS-TABLES & FORMATS SEQ 0117 
DHS0: .ASCIZ /SRO WAS SR2 WAS TESTNO ERRORPC/ 


133 920128 
051501 05144 
053440 0515 
051505 1 
042640 0511 
04152 


MMO 
Nw — 


we 
™~ 
NFwWow 


DH42: .ASCIZ /PSW WAS R6 WAS TESTNO ERRORPC/ 


DHS4: ASCII] /EXPECTED RECEIVED/<CRLF > 


706 
5707 046421 123 030122 020040 -ASCIZ /SRO SR2 SRO WAS SR2 WAS TESTNO ERRORPC/ 
5708 046426 020040 {dere | 031122 


perth Ys 50130 O13) DH45: .ASCII] /EXPECTED:/<CRLF> 
oces1$ 120 053523 020040 eASCJ1 = /PSW PC SRO SR2/<CRLF> 


eASCI1 /170017 (3$4#4) 020147 (3$)/<CRLF> 


PROMI RINININIDRIPIR ot et ot ee 


Bho WSF ARASLSSSNVS ARUN LS Sere arun oS 
z 
™ 
wm 
™m 
MN 
F 
™ 
w 
> 
S 
2 
w 
we 
— 
— 
— 


~“N ha 
Pk ¢ 
o i] 
x 
~ “Ns 
ron— Ni 
o ROP 
y «fz 
‘bos 
SEP 
Sseesse 2]29S2) 


OWE wn 


eASCI] = /RECEIVED:/<CRLF> 
046616 051520 020127 020040 -ASCIZ = /PSW PC SRO SR2 TESTNO ERRORPC/ 
046624 02004 4 

; 0 020040 051123 

Oe ~020040 020040 


Meee 


mm 

wm 

™ 
Srmofr 


(peo 
a 


PNA aaa a a a RU UU nn 
L NINNININININNNN NNN NNN 


mr 


DH46: .ASCII] /DATA DATA/<CRLF> 


$f 


041505 ~ASCIZ /EXPECTD RECELVD TESTNO ERRORPC/ 


—-—S - O-— Was 


wT er eh aha! 
mrs 
rSoo 


046742 
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DH5SO:  .ASCIZ /TESTNO ERRORPC/ 


DH51:  .ASCIZ /SRO WAS SR2 WAS TESTNO ERRORPC/ 


NMNOLWNLSO 
NSF —Onroodu 


ss 


/PHYSICL PAR 4/<CRLF> 


ERs 


/ADDRESS V.B.A. PAR 4 SRO WAS SR2 WAS PSW TESTNO ERRORPC/ 


SSSVSAE 
z3 


S2ESFE22 
NFS So 


/PSW WAS EXPECTD TESTNO ERRORPC/ 


EDU LUDUSUDUSUSDUSUSU Ia SUSTAIN 


00 
06 
14 
22 
30 
36 
fete 
51 
56 
64 


051117 


001264 : . TRAPPC, TRAPPS ,WASR6, TESTNO, SERRPC ,0 


TRAPPC , TRAPPS ,WASR6 ,WASSRO,WASSR2, TESTNO, SERRPC 0 
001262 


001262 : ° SREGO,$REG1, TESTNO, SERRPC 0 

001116 : ° SREGO, TESTNO, SERRPC 0 

001304 —— ANDADR ,GRADR , TONUM, TESTNO, SERRPC ,0 
SREGO,$REG1,$REG1, TESTNO, SERRPC ,0 
SREGO, SREG1 , SREG2, SREG2, TESTNO,SERRPC,0 


o-oo 
MmMOnrNeor 


ggeges 
genes 


001116 
001116 i ss $SREGO, TESTNO, SERRPC 0 


001164 001174 ae SREGO, SREG1 ,SREGS ,SREG2, TESTNO, SERRPC 0 
001262 001116 


001306 001172 oss PBALO,VIRT1,$REG4, TESTNO,SERRPC,0 
001116 000000 


SHEE 
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D120: .WORD PBALO,VIRT1,VIRT2,S$REG4 ,SREGS ,STMPO, TESTNO,SERRPC ,0 


MD-11-CJKDA-A F-1 
CJKDAA.P11 


—) 
ee 
+> 
 @ 


je — 
z 
on 0 
Seve & rrr 3 
S oe Se 
ee et Cet et at et 
~e wy 
oos 


$ 


DT21: .WORD  S$REGS,SREGS,TESTNO,SERRPC 0 

DT22: .WORD  $REGO,SREGS,SREGS, TESTNO, SERRPC,0 

DT23: .WORD  SREGS,TESTNO,SERRPC,0 

D124: .WORD  S$REG2,$REG1,TESTNO,SERRPC ,0 
001262 D126: .WORD S$REG2,S$TMPO,TESTNO,SERRPC 0 


eorite DT30: .WORD  WASSRO,SREGS,SREG2,STMPO, TESTNO,SERRPC ,0 


oH DT31:  .WORD WASSR2,S$REG4,SREG2,STMPO, TESTNO,SERRPC 0 


itis DT32: .WORD  SREGO,SREG4 ,WASSRO,WASSR2,TESTNO,SERRPC 0 


001262 D133: .WORD S$REGO,SREG4,TESTNO,SERRPC 0 


oH 14 D134: .WORD  $REGO,SREG4,WASSRO,SREG2,TESTNO,SERRPC 0 


od the D135:  .WORD  S$REGO,SREG4,WASSR2,$REG3,TESTNO,SERRPC,0 


001262 D136: .WORD WASSR2,$REG1,TESTNO,SERRPC .0 


oH iG D137: .WORD STMPO,STMP2,WASSRO,WASSR2,TESTNO,SERRPC 0 


001262 D140: .WORD WASSRO,WASSR2,TESTNO,SERRPC ,0 
001262 D142:. .WORD $REG1,S$REG2,TESTNO,SERRPC,0 


001164 001272 D144: .WORD S$REGO,SREG1,WASSRO,WASSR2,TESTNO,SERRPC 0 
001262 001116 


001170 001272 D145: .WORD  $REG1,S$REG3,WASSRO,WASSR2,TESTNO,SERRPC,0 
001262 001116 


gegggess 
Ror 


Sseees 


gages 
Reese 


S3ss 
SBsx 


gosesgesy 
RSe8Sse 


sessss 
Masten 


Es 
x 


001164 001262 D146: .WORD $REGO,SREG1,TESTNO,SERRPC,0 
000000 


000000 0750: .WORD TESTNO,SERRPC,0 
001262 D151: .WORD  WASSRO,WASSR2,TESTNO,SERRPC 0 


001172 D152: .WORD PBALO,VIRT1,$REG4 ,WASSRO,WASSR2,STMPO, TESTNO, SERRPC 0 


001262 D156: .WORD $REG1,$REG2,TESTNO,SERRPC 0 
000000 


SSSsSssssss 
—_ ee ss 
— = NNW ON 
—OON SNC Oo 
SO PFMMMAMwMOA 
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DF 1: -BYTE 0,9,0,0,0 


DF 2: -BYTE 0,0,0,0,0,0,0 


DF3: -BYTE 0,0,0,0 


DF7: -BYTE 0,0,0 
DF10: .BYTE 0,0,1,0,0 


DF 11: -BYTE 0,0,2,0,0 
DFl2: -BYTE 0,0,0,2,0,0 


DF13: .BYTE 0,0,0 
DF16: .BYTE 0,0,0,0,0,0 


DFI7: .BYTE 43,0.0,0,0 
DF20: .BYTE 3,0,0,0,0,0,0,0 


DF21: .BYTE 0,0,0,0 
DF22: .BYTE 0,0,0,0,0 


DF23: .BYTE 0,0,0 
DF24: .BYTE 0,0,0,0 


DF30: .BYTE 0,0,0,0,0,0 
DF46: .BYTE 0,0,0,0 

DFS: “BYTE 0:0,0,0 

DFS2: .BYTE 3,0,0,0,0,0,0,0 
DFS56: .BYTE 0,0,0,0 


000001 -END 
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SEQ 0121 
047450 


FRRLLLELT 
BEFIESCS 
BRVAAS ASF 


s 


B1T0 

B1T00 
B1T01 
B1102 
B1T03 
B1T04 
B1T05 
B1T06 
B1107 
B1T08 
B1T09 
BIT1 

B1T10 
B1T11 
BIT12 
B1T13 
BIT14 
81715 
BIT2 

B1T3 


s 


Ot tt at ee ws os 
SSS NNN NNN NNN 
es ™~™ 


AVECT2= 000000 047434 043115 PRO = 000000 





CJKDAA.P11 29-JAN-79 14:3 
Sw8 
Sw9 
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000400 SCNTLC 
1000 


" 

os 

~~ 

~_N 

“NN Ss 

Coo 
haununun 


PS 
PWRASG 040652 


TRAPPS 001270 

R7 =%000007 TRAPVE= 000034 
SAVREG= 104413 TRIVEC= 000014 
SETREG 035166 T 20566 
SRO 177572 
177574 

177576 

SR3 172516 
STACK = 001100 
STAR 


=" 
nw 
—-<« 
tat 
=) 


UIPD 616 
USESTK= 000700 
P 0006 


Ca ses 
NENSSRROOOS 


oO es ss 


m™ 

-S5S NOUS wh 
Mr 
No 


serreersssssessee 


Pr 
Www 
NOOO 


WASSR2 001274 
= 000100 
0204 


20000 
0 
000001 
000001 
000002 
000004 
000010 
000020 
00004 


0 
100 
200 


833s 
ss 


e 
38 


a 


SMSGLG 001244 001152 
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STPFLG 001157 STRPAD 040434 STYPOS $XTSTR 034150 
STSTM 706 SOF ILL te. 
STSTNA SUNIT 05016 
STTYIN $x 
STYPBN 037436 $TYPOC 536 


- ABS. 050167 000 


ERRORS DETECTED: 0 


CJKDAA,CJKDAA/SOL/NL: TOC=CJKDAA.P11 
RUN-TIME: 35 20 .7 SECONDS 
RUN-TIME RATIO: 335/57=5.8 
CORE USED: 32K (63 PAGES) 





